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UNIVERSAL ASSEMBLER VERSION 2.2.B JULY 29, 1979 (IN-HOUSE) 



CONFIDENTIAL PROPRIETARY INFORMATION 

THIS ITEM IS THE PROPERTY OF DATAPOINT CORPORATION, SAN ANTONIO, TEXAS, AND CONTAINS CONFIDENTIAL AND 
TRADE SECRET INFORMATION. THIS ITEM MAY NOT BE TRANSFERRED FROM THE CUSTODY OR CONTROL OF DATAPOINT EXCEPT 
AS AUTHORIZED BY DATAPOINT AND THEN ONLY BY WAY OF LOAN FOR LIMITED PURPOSES. IT MUST NOT BE REPRODUCED 
IN WHOLE OR IN PART AND MUST BE RETURNED TO DATAPOINT UPON REQUEST AND IN ALL EVENTS UPON COMPLETION OF 
THE PURPOSE OF THE LOAN. 

NEITHER THIS ITEM NOR THE INFORMATION IT CONTAINS MAY BE USED OR DISCLOSED TO PERSONS NOT HAVING A NEED 
FOR SUCH USE OR DISCLOSURE CONSISTENT WITH THE PURPOSE OF THE LOAN, WITHOUT THE PRIOR WRI'TTEN CONSENT OF 
DATAPOINT. 
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COMMAND LINE nkSt 5NAP3 PROCl 4G3. PROC ,,» PROCl 4G3;GB I PLX 

INCLUSION AX PROCINC/TXT»DR0 

INCLUSION B» PROC14G3/LIB:DRO.PMACMIC 

INCLUSION C: PROCi 4G3/LIB«DR0.GMACROZ 

INCLUSION D: PROCl 4G3/LIB»DR0 . PROCEQUS 

INCLUSION E« PROC14G3/LIB»DRO.BDEF1BOO 

INCLUSION Fi PROC14G3/LIB»DR0.MDEF1800 

INCLUSION Gs PR0C14G3/LIB:DR0.P0RTEQUS 

INCLUSION ris PROCI4G3/LIBXDR0.PORTASGN 

INCLUSION I: PROC 1 4G3/LIB:DR0.PROCPARM 

PROGRAM NAME: PPOC 



PROGRAM ADDRESS BLOCKS* 



PRIMARY TRANSFER ADDRESS* 



EXTERNAL DEFINITIONS* 



POR 

IVIOL$ 

LODCF 

DMPSIN 

INPUT 

EXrtRITE 

MIN 

SC 

ALPHA 



000000 
001333 
000431 
0006b4 
001 007 
001074 
001171 
001314 
00 1417 



/PROCL/ 
/PROCL/ 
/PROCL/ 
/PROCL/ 
/PROCL/ 
/PROCL/ 
/PROCL/ 
/PROCL/ 
/PROCL/ 



010000 


/ABSOLUTE/ SIZE= 


=000000 (ABS) 


1674 00 


/SYSIVR/ SIZE= 


=000400 (ABS) 


1 70000 


/SYSROM/ SIZE= 


=000047 (ABS) 


000000 


/PROCL/ SIZE= 


=002000 (RED 


000000 


/PROCP/ SI ZE= 


= 004000 (RED 


000000 


/PROCL/ 




DL$DO 


000051 /PROCL/ 


SCDON 


UDOP 


001335 /PROCL/ 


SYS TAT 


DM POUT 


000602 /PROCL/ 


DMPSOUT 


BLKOUT 


000675 /PROCL/ 


BLKIN 


EX ADR 


001032 /PROCL/ 


EXSTAT 


EXC0M4 


001105 /PROCL/ 


OUTPUT 


MOUT 


001234 /PROCL/ 


SCROMLI 


SCRAMI 


001321 /PROCL/ 


UDPOP 


SYSRETl 


001514 /PROCL/ 


REGS 



EXTERNAL REFERENCES (UNDEFINED SYMBOLS)* 

MEMPF$ FETCHN FETCH SRVRPT 



RETS 
FETCHRN 



SRVNXT 
RIND 



FETCH W 



001351 
000400 
000616 
000751 
001053 
00 1115 
001307 
001330 
001564 



PSHSTO 



/PROCL/ 
/PROCL/ 
/PROCL/ 
/PROCL/ 
/PROCL/ 
/PROCL/ 
/PROCL/ 
/PROCL/ 
/PROCL/ 



PCMOD 



SCLST 


001341 


/PROCL/ 


INFO 


0004 1 


/PROCL/ 


DMPIN 


000635 


/PROCL/ 


PIN 


001000 


/PROCL/ 


EXDATA 


001064 


/PROCL/ 


EXCOMl 


00 1 1 22 


/PROCL/ 


BP 


00 1312 


/PROCL/ 


BETA 


001400 


/PROCL/ 


STL 


001651 


/PROCL/ 


SRVDO 


POPS TO 


S/SRETO 
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2. 




3. 




4. 




5. 




6. 


(■ 


7. 




8. 




9. 


f 


10. 




II . 




12. 


( 


13. 




14. 




lb. 


i 


16. 




17. 




18. 




19. 




20. 




21 . 




22. 




23. 




24. 




2b. 




26. 




27. 




28, 




29. 




30. 




31 . 




32. 




33, 


'' 


34. 




3b. 




36. 


[ 


37. 




38. 




39. 


( 


40. 




41 . 




42. 


( 


43. 


( 





2.14.G 
2 . I 4 . F 
14. E 
14. D 
14. C 
14. B 



2, 
2. 
2, 

2, 



2. 14. A 



HJS 
HJS 
HJS 
HJS 
HJS 
HJS 
HJS 



79 NOV 
79 OCT 
79 AUG 
79 AUG 
79 AUG 
79 APR 
79 APR 



12 

12. D 
J2.C 
2. 12. A 
12 



HJS 
HJS 
HJS 
HJS 



2 . 9 HJS 
2.9.K HJS 
2. 9. J HJS 
2.9.1 HJS 
2.9.H HJS 
2.9.G HJS 
2.9.F HJS 
2.9.E HJS 
2.9.D HJS 
2.9.C HJS 
2.9.B HJS 
2. 9. A HJS 

2.8.B HJS 
2. 8. A HJS 

2.7. HJS 

2.H.B HJS 

2.b.C HJS 
2.b.B HJS 
2.b.A HJS 

2.4.B HJS 

2. 4. A HJS 



78 OCT 
78 OCT 
78 OCT 
78 SEP 



78 JUL 
78 APR 
78 MAR 
78 Fii3 
18 FEB 

78 fee 

78 JAN 
78 JAN 
77 DEC 
77 DEC 
77 NOV 
77 NOV 

77 SEP 
77 SEP 



27 
10 
13 
10 

6 
17 

4 



2. 13. A HJS 79 JAN 22 



16 
15 
12 
05 



20 
23 
20 
27 
16 

3 
II 

4 
21 
13 
20 
14 

22 
19 



77 SEP 7 
77 AUG 31 

77 AUG 16 
77 JULY 13 
77 JULY 12 

77 JULY 12 

77 JULY 7 



INSERT TIMING & DMP I/O INTERFACE 

CHANGE TO HONEYWELL NOISEMAKER (SOUNDS BEITER) 

FINAL CLEANUP (& BUG FIX) BEFORE RELEASE 

FOUND BUGS AND FIXED THEM 

FINAL CLEANUP BEFORE TRY THIS VERSION 

RE-ORGANIZE ROUTINES TO MAKE IT FIT 

START MODIFICATIONS FOR INTERNAL RIM 3800 

FIX REGS TO rtORK WITH ACCESS PROTECTED STACK 

FINAL RELEASE 

CHANGE SYSTAT SO CAN TELL THE PRE-RELEASE LEVEL 
CORRECT THE PC FOR MEMORY FAULTS TO MATCH 6600 PC 
REFORMAT, RECOMMENT & FIX STA-CK FOR ACCESS ENABLE 
THE NUMBER IS OCTAL!! TO MATCH DEBGU V DISPLAY 

FINAL RELEASE OF VERSION 9 

SPLIT PROC, MAKE RELOCATABLE, CHANGE APF, ADD AML 

RESTRUCTURE INTERRUPT SEQUENCE & MINOR MODS 

CORRECT 9.H FOR FAULT CLEANUP 

EVERYBODY MEMPF-'S, KEYBOARD SCAN, & SIR CHANGE 

CORRECT TIMING, COMMENTS, & ADD POR TIMEOUT 

FIXING MIN/MOUT TIMINGS 

TESTING REPEATED KEYIN CONTROLS 

CORRECT STL INSTRUCTION 

BACK OFF FROM KBD RPT & RE-DO STL FOR TIMING 

INCLUDE TiMINGS AS CALCULATED & FIX MINOR BUGS 

CHANGE KEYBOARD CODE TO AID REPEATED KEY CONTROL 

MTI CHANGE SO LENGTH IS 2 BYTE NUMBER 

MTI CHANGE TO ALLOW MFRPT ON ANY INTERRUPT 

MINOR BUG-FIX AND OPTIMIZATION FOR RELEASE 

MTI SPECIAL VERSION 

UPDATE COMMENTS ON THE CODE 
CORRECTED NAMES FOR COM REGISTERS 
UP TO NEXT NEW VERSION NUMBER 

FIXED ILLEGAL MAR CHANGE IN REGL RETURN TO FETCH 
FIXED FILE TO CONFORM TO VRP FORMAT (A LITIXE) 
INITIAL PRE-RELEASE OF THE MICRO-CODE 



( 



FAGh 4 



PH0CI4G3/LIB 



DATAPOINT CONFIDhNTlAL INFORMATION - SEE PAGE 1 
MICRO-PHOCESSOH EMULATION SUPPORT CODE - HJS - 



79DEC12 16*20 



44. 



PAGt 5 



FH0C14G3/LIB 



r 



DATAPOINT CONFIDENTIAL INFORMATION - SEE PAGE 1 
MICHO-PROCHSSOH EMULATION SUPPORT CODE - HJS - 



79DEC12 16*20 



45. 
46. 
47. 
48. 
49. 
50. 
51 . 
52. 
53. 
54. 
55. 
56. 
57. 
58. 
59. 
60. 
61 . 
62. 
63. 
64. 
65. 
66. 
67. 
68. 
69. 
70. 
71. 
72. 
73. 
74. 
75. 
76. 
77. 
78. 
79. 
80. 
81 . 
82. 
83. 

1 .A 
10. A 
1 1 .A 



USEFUL INFORMATION TO BE PASSED ON » 

•********•,*******•*•***••******•******•**•***•**•*.**• 

IF SECTOR CONTAINING SEKBSl IS WRITE PROTECTED THEN CAN NOT DO A RESTART!!!! 

THE FOLLOWING TIMING RESTRICTIONS APPLY TO MEMORY OPERATIONS* 



SMR & MOW 


TO 


MWAIT 






100 


NS 


MINIMUM 


SMR &. UDH 


— > 


MWAIT 






450 


NS 


WITH NO 


I MAR & DMAR 


-> 


SMR & 


MDW 




200 


NS 




MAR OH 


-> 


SMR ik 


MDW 




100 


NS 




MAROL 


— > 


SMR & 


MDW 




000 


NS 




MWAIT 


-> 


MDR 






100 


NS 


(THIS 



BEFORE THE MWAIT 
INTERVENING I MAR, 



TEST PERFORMED 
DMAR, OR XX2MR 



DONE BY MEMPF CHECK!) 
*•*•****•*******•*•**•*****•**•** ••************************^ 

ALL SMR'S AND MDW'S MUST HAVE FOLLOWING MWAIT ,MEMPFX EVERYWHERE 

IN THE CODE EVEN IF MWAIT ,$+1 IS USED UGNORING MEMORY FAULT) 
**•••*•*••*****•*•*•******••**•**•****••**••***••*******•**•*••**•*•**• 

FOR TESTING MEMPF, CHANGE MWAIT MACRO TO BE JT,MP $+1 <« 
CODE THERE, TESTABLE AS USED BUT NO EFFECT!! 
**.**••**•.*•**********•*•**********•**•*••*********••******* 

EACH SERVICE ROUTINE THAT USES THE MAR MUST HAVE A MWAIT ,$+1 BEFORE THE 

MAR CHANGED, AND MUST CLEAR (TEMPORARILY) SWUSER IF USED. 

RETURN THROUGH SRVNXT. 

************************************************************** 

ALL INPUTS FROM A PORT INSTRUCTION SHOULD BE LOGICAL (OUTPUT CAN ONLY BE 

LOGICAL OR 'IT^). 

ARITHMETICS MAY BE DONE ON INPUTS WITH CAUTION. ONLY If THE DATA HAS NO SETUP 

TIME, i.e. MDR IS OK, BUT IMPI OR URI ARE NO-NO'S. 

************************************************************** 

DELAY AROUND SECTOR TABLE WRITES IS NOT NECESSARY. 
•*•**********•*•**•••*******•****•*******•*****••*******•**** 

FOR A FONT LOAD MUST DO: 1) SDLM, 2) SKCH'S AS NEEDED, 3) THREE WAISTED 

SLDCH - RLDCH PAIRS TO SET UP COUNTER CORRECTLY, 4) SEVEN SETS OF SLDCH - 

RLDCH WITH THE DATA IN MAROL, 5) FINALLY RLDM AT THE END 

NOTE! THE DELAY FROM SLDCH TO RLDCH MUST BE Af LEAST 200 NSEC. IN ALL CASES 

AND MAROL MUST NOT CHANGE DURING THIS TIME. EXTRA RLDCH'S DO NOT HURT. 

****•***••*•**••*••****•*•*******•**•*****•***•***•*****• 

INC PROCINC 

SNAPOPT -X 

SNAP OPT X 

INC PR0C14G3.P0RTASGN 



PORT ASSIGNMENT DISPLAY 



( 
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3.H 

4.H 

5.H 

6.H 

7.H 

8.H 

9.H 

10. H 

II. H 

12. H 

13.H 

14. H 

15. H 

16. H 

17. H 

18. H 

19. H 

20. H 

21 .H 

22. H 

23. H 

24. H 

25. H 

26. H 

2 7.H 

28. H 

29. H 

30. H 

31 .H 

32. H 

33. H 

34. H 

35. H 

36. H 

37. H 

38. H 
39. H 
40. H 
41 .H 
42. H 
43. H 



MICRO-PROCESSOR EMULATION SUPPORT CODE - HJS - 79DEC12 16*20 

. THE PORT ASSIGNMENTS, ORGANIZED BY PORT - SUBPORT NUMBER IN IN/OUT PAIRS 



PORT 



2 
2 



SUB 



1 



LIREG LIMP 
I 



COMF 



IIMP DIMP 
10 I 


I SRVREQ STATUS 

RIMDATO MOW LSPKR 
10 I 



3 
BASrt 

CHUF 



4 

MODW 

I MAR 



5 

STrt 

DMAR 



6 
LUF 



7 

LUCF 



IDCODL IDCODH UCFLG tkO^ STEK 

RIMADRO LDRIMBP SLDCH RLDCH 



LDMAP SKCH SDLM KBSC RDLM CMPF SMR 
I KBDD EXC0M17 RIMDATI RIMSTAI EXCOM 1 1 EXC0M12 EXC0M14 EXC0M15 

DMPADH DMPADL DMPDTO 
10 I DMPRDS DMPDTI ??VSTS?? 

URFO 
I 

URO (MR2XXL) 

1 MARIL 

URO {MR2XXH) 

1 MARIH 

MAROL (XX2MRL) 

1 URI 

MAR OH .(XX2MRH) 

1 URI 



USER 10 PORTS 4-7 

REGS -0 URA URB URC URD URE URH URL URX 
10 PCH PCL SPH SPL PSrt 135 102 IMP 



( 



PAGE 



44. H 
4b. H 
46. H 
47. H 

48. H 

49. H 

50. H 
51. H 
52. H 
53. H 
54. H 
55. H 
56. H 

57. H 

58. H 
59. H 
60. H 
61 .H 
62. H 
63. H 
64. H 
65. H 
66. ri 
67. H 
68. H 
69. H 
70. H 
12. A 

l.I 
2.1 
3.1 
4.1 
5.1 
6.1 
7.1 
8.1 
9.1 



FH0C14G3/LIB 



000002 
000014 
000107 

000003 
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MICRO-PHOCESSOP EMULATION SUPPORT CODE - HJS - 79DEC12 16*20 

. THE PORT ASSIGNMENTS, ORGANIZED BY PORT - SUBPORT NUMBER IN IN/OUT PAIRS 



SUBITS 
SRVREQ* SCPMEM 
STATUS* STUSCF 



4 5 6 7 
SCDSPNL SCONMS SCHUMS 
STKBKC STK6NS STKBRDY STBOTLN 



MODrt: SrtlNTE SWBASD SWUSER SWIRIM SrtSTDT SWRPT 
STEK» STLA 

JUMP INPUT CONDITION CODES ARE: 
SELECT 1 2 3 4 5 

CARRY ZERO 



STLrt 



SrtALBT 
STLSP 

7 



MEMRDY PARITY IMPZERO IMPODD DMPRDY TRUE 



DOUBLY NAMED iSUB) PORTS AREi 





URO 


<> 


MR2XXL 




URO 


<> 


MR2 XXH 




MAROL 


<> 


XX2MRL 




MAR OH 


<> 


XX2MRH 




INC 




PR0C14 


VER 


EQU 




2 


REV 


EQU 




014 


PRE 


EQU 




*(y 



\ INDIRECT TO PARAMETER FILE 

1800 - INFO INSTRUCTION PROCESSOR NUMBER 
INFO INST. MICRO-CODE REVISION NUMBER 
PRE-RELEASE VERSION <IF NOT ZERO!!) 



TYPE 



EQU 



=0 FOR 38 00 
= 1 FOR 18 00 
=3 FOR 38 XX 



PROCESSOR CODE 
PROCESSOR CODE 
(INTERNAL RIM) 
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. EXTENDED CONDITIONS, AND SYSTEM REGISTER DEFINITIONS 



12.1 
13.1 
14. 1 
15.1 
16.1 
17.1 
18.1 
19.1 
20.1 
21 .1 
22.1 
23.1 
24.1 
25.1 
26.1 
27. 1 
28.1 
29.1 
30.1 
31.1 
32.1 
33.1 
34.1 
35.1 
36.1 
37.1 
38.1 
39.1 
40.1 
41.1 
42.1 
43.1 
44.1 
45.1 
46.1 
47.1 
48.1 
49.1 
50.1 
51.1 
52.1 
53.1 
54.1 
55.1 
56.1 
57.1 
58.1 
59.1 
60.1 
61 .1 
62.1 
63.1 



02 0002 
020003 
020004 
020005 
020006 



010002 

010000 
01 0001 
010002 



01 0015 



030000 
030001 
030002 
030001 
030002 



CONDITION CODES 



MO 


EQU 


F6+2 


MP 


EQU 


F6+3 


IZ 


EQU 


F6+4 


10 


EQU 


F6+5 


BR 


EQU 


F6+6 


* 







. REGISTER ALLOCATION 
Q EQU F5+02 



PDLNP EQU F5+0 
KBSCNT EQU F5+0 1 
SCANSV EQU F5=i-02 

DISKETTE INTERFACE 

F5+03 .. F5+013 
F5+014 (FREE) 

AUDIO CHANNEL CONTROL REGISTER 



MEMORY READY 

MEMORY FAILURE (OF ANY SORT!) 

IMPLICIT REGISTER ZERO 

IMPLICIT REGISTER ODD 

BUS READY (MICRO-BUS ONLY) 



NOBODY SHOULD DO WRITE-^S TO Q 

DISPLAY, LINE POINTER 

KEYBOARD SCAN COUNTER 

KEYBOARD SAVED SCAN NUMBER, REPEATED AI 



ACD 
ACPL 
ACPH 



EQU 
EQU 

EQil 



TEMPORARIES 



AUDIO CHANNEL ATTEN/VALUE 
AUDIO CHANNEL CONTROL d MSB POINTER 
AVAILABLE IN ANY ROUTINE, LOST BETWEEN ROUTINES 



F5*0 1 5 
F5+016 
F5-I-0 1 7 



SUBROUTINE CALL AND RETURN LINKAGE REGS 
PROCESSOR EMULATION TEMPORARIES 



H & L ONLY FOR DOUBLE H/L MACROS 



LINK EQU F5+F6.+ 00 

TEMPI EQU F5+F6+01 

TEMP2 EQU F5+F6+02 

TEMPH EQU TEMP 1 

TEMPL EQU TEMP2 
* 

COMMUNICATION PORT REGISTER ALLOCATIONS 

F5+F6+03 ..017 

CAPABILITY BITS* 

THESE BITS DEFINE THE VERSION OF THE 1800/3800 PROCESSOR THAT THIS IS FOR 

XX XXX XXX 

MICRO I/O BUS AVAILABLE 

1 COMMUNICATIONS INTERFACE (MULTIPORT) ASYNC. 

2 1800 SINGLE/DOUBLE DISKETfE DRIVE AVAILABLE 

3 APF SPECIAL MICRO-BUS INTERFACE AVAILABLE 

4 OMP I/O INTERFACE INSTRUCTIONS AVAILABLE 

5 INBOARD RIM AVAILABLE 

6 5500 I/O BUS AVAL I ABLE 

7 COMMUNICATIONS INTERFACE AVAILABLE (ASYNC, BISYNC, & SDLC) 



( 
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. EXTENDED CONDITIONS, AND SYSTEM REGISTER DEFINITIONS 



64.1 


000000 


6b. I 


000000 


66.1 


000000 


6 7. 1 


000000 


68.1 


000020 


69.1 


000040 


70.1 


000000 


71.1 


000000 


72.1 




73.1 


000060 


/4.I 




75.1 




76 . 1 




77.1 


000000 


78 . 1 


002000 


79.1 


004 000 


80.1 


006000 


81 .1 


007000 


82.1 




84. 




86. 




87. 




88. 


000000 


89. 


000000 


90. 


000000 


91. 


000000 


92. 


OOOOOOL 



NOT AVAILABLE 

IMA BIT HERE !! 

NOT AVAILABLE 

NOT AVAILABLE 

SPECIAL CODE FOR DMP BUS INCLUDED 

ONLY INBOARD RIM AVAILABLE 

NOT AVAILABLE (EXCEPT INBOARD RIM) 

NOT AVAILABLE 

C APABI LI EQ U CAPCOM+C AP bb 1 0+C APR I M^CAPDMP I O+CAP APF+CAPBLUE+CAP I MA+CAP M I CR 
* 

. LOCATION OF THE CODE IN ROMS IS A FOLLOWS (MSB & LSB OF COURSE) 



CAPMICR 


EQU 


BO-BO 


CAP I MA 


EQU 


Bl-Bl 


CAPBLUE 


EQU 


B2-B2 


CAPAPF 


EQU 


B3-B3 


CAP DMP 10 


EQU 


B4 


CAPRIM 


EQU 


B5 


CAP 155 10 


EQU 


B6-B6 


CAPCOM 


EQU 


B7-B7 



PROC 


EQU 


00 <9 


PROD 


EQU 


02<9 


FLEX 


EQU 


04<9 


CDOX 


EQU 


06<9 


CDOR 


EQU 


07<9 


• 


I FNE 
XIF 


TYPE, 3 


PROCL 


ORG 


PROC 


PROCP 


ORG 





PROCL 


USE 


PROCL 




USE 


PROCP 


PROCP 


LOC 


PROCL, 2 



EMULATION SUPi^ORT CODE IN ROMS 
EMULATION SUPPORT CODE IN ROMS 2 
MICRO-BUS CODE IN ROMS 4 & 5 
COMM TRANSMIT CODE IN ROM 6 
COMM RECEIVE CODE IN ROM 7 



1 

3 



LOGICAL SPACE IN ROM-'S 
PHYSICAL SPACE DONE AT LINK TIME 
ENABLE BOTH ADDRESS SPACES 
BUILD CODE IN, PHYSICAL SPACE 
LOC-'ING TO LOGICAL ADDRESSES 
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95. 

96. 

97. 

98. 

99. 
100. 
101 . 
102. 
103. 
104. 
105. 

106. 
107. 
108. 
109. 

no. 

111. 
112. 

113. 

114. 

115. 
116. 
117. 
118. 
119. 
120. 

121. 
122. 
123. 
1 24 . 

125. 

126. 

127. 
128. 
129. 
130. 

131 . 
132. 
J 33. 
134. 



OOOOOOL 



OOOOOOL OIOIIOOI I 1 11 1 1 11 



OOOOOIL 
000002L 

000003L 
000004L 
000005L 
000006L 
000007L 
0000 lOL 
OOOOllL 



110001 00 
00 1 101 I 1 

01010001 
00 1 I 1 I 1 
00 1101 11 
00 110 1 It 
000001 II 
00000 1 I 1 
00 1 I 1 I 1 



000012L 01010001 
0000 13L 00000 I 1 1 
0000I4L 01010001 
0000 15L 001101 1 1 
000016L 001 10001 
0000 17L 01000101 
000020L 11000010 



00002 IL 
000022L 
000023L 
0U0024L 
000025L 

000026L 
000027L 
000030L 
00003.1 L 
000032L 
000033L 
000034L 

000035L 
000036L 
000037L 
000040L 
000041 L 
000042L 
000043L 



01010001 
001 10 I II 
00 1101 11 
01010010 
II 000000 

01010001 

00 1101 II 
01010001 

001 101 1 1 
01010001 
00 I I 1 1 I 
01 101 1 II 

00 I 101 11 

01 I 10001 
01 101 I 10 
01010001 
1 1 000 I 00 
00 I I 1 1 1 
II 000000 



1 1 II 1 no 

010001 JO 

00000000 
1 000 1 1 00 
00000100 

000000 1 1 

1 1 1 I 1101 
1 1 11 0001 
01000100 

1001 1100 
10 11 0000 
00100100 
10001 001 
001 101 II 
00000010 
11011010 



0000 1 100 

1 1100000 
00000101 
0001 0000 
1 1101101 

1 1 110000 
00000101 
1 1101 1 11 
I 11 00000 
00000000 
11000000 
1 I II 0010 

00101001 
1 1110010 
1 1 1 00 1 
00000000 

noi I no 

00001100 
1 1100010 



MICROFHOCESSOrt EMULATION SUFFOHT CODE - HJS ~ 
. POrtEH ON RESTART, INITIALIZE THE WORLD 

* 

FOR* 

. INITIALIZE ALL CONTROL TABLES THAT CAN. NOT BE INITIO BY FOR MACRO CODE 



BPGX 
STB 
MWAIT 
STB 

LDP I 

LDPT 
LDFT 
LDRT 
LDRT 
LDPT 

/W 
' LDRI 

LDPI 

TSTIP 

BRA 



$ 

RDLM 

.IGNORE 

CMFF 

FSrtO,0 

MODW 

BASW 

ACD 

KBSCNT 

KBSC 



DO NOT CLEAR UP THE DISPLAY 

TIMEOUT SAFETY (IGNORE MEMORY FAULT) 

(INSTEAD OF FAULT JUMP) 

T-REG IS ZERO FOR THE FOLLOWING 

SET EMULATION PSW 

FORT CONTROLS AFPRO.PRIATLY 
BASE REGISTER IS INITIALLY ZERO 
NO AUDIO CHANNEL INITIALLY 
SAVE THE SCAN NUMBER AND 
START THE FLRST KEY SCAN 



FDLNP,SEDLBOT,CC POINT TO THE BOTTOM LINE 



PCOLtSRTMOUT 

,STLIMOUT,STEK 

POROUT,FZ 



ASSUME THAT A TIMEOUT WILL HAPPEN 

CHECK IF IT DID 

YES, DON'T INIT STL OR MEMORY 



MUST INIT SECTOR TABLE & ZERO SYSESR OR IMMEDIATE RESTART OR MEMPF 

INIT WHOLE SECTOR TABLE 



PORLST 



LDTI 
LDPT 

DOTI 
BRA 

LDPI 

LDPI 

LDPI 



STAE+STWE 
MAROH.STW 

,AC, 16 
PORLST, FC 



LOOP TILL ALL ARE ACCESS & WRITE ENABLE 



PORZRO 



'itien — 

.LOIJ 
MWAIT 
STB 
BRA 



STW,SYSR0M>8. AND. 0360 SECTOR 017 IS SYSTEM ROM , PROTECT IT 
MARCH. SYSESR>8 POINT TO THE EMULATION SUPPORT PAGE 

MAROL, SYSESR START OF IT (T-REG IS ZERO) 

MDWj f 
-"TEMPE7reM**i:r 



.IGNORE / . 
IMAR,^< ^i^ 
PORZRO,-^ 



ZERO THE NEXT BYTE (T-REG IS ZERO) 
COUNT ALL OF THE BYTES IN THE PAGE 

DATA TO BE WRIR^EN IS ZERO 

!! IGNORE ANY AND ALL FAULTS !! 

CONTINUE TILL ALL PAGE DONE 



f'2:: 



PAGi£ I I 



135. 
136. 
137. 
138. 



PR0C14G3/LIB 



000044L 00 I 101 11 10001001 



DATAPOINT CONFIDENTIAL INFORMATION - SEE PAGE 1 

MICRO-PHOCESSOH EMULATION SUPPORT CODE - HJS - 
. POWER ON RESTART, INITIALIZE THE WORLD 



00004bL 01010001 11 11 0000 
000046L 00 1 101 11 10001 000 

139. 

140. 

141. 

142. 

143. >000047L 01011001 11111111 
>00005.0L 1 1001 1 11 11111111 

144. 



FETPC 
POROUT 



LDPT 
LDPI 



PCOL 



LOAD THE PC LSB ADDRESS 



PC0H,SYSR0M>8 

. NOTE* NORMALLY HERE, PCL IS ZERO AND PCH = SYSR0M>8 

THIS GENERATES A .POINTER TO SRPOWER-UP VECTOR ENTRY 



r 



79DEC12 16*20 




BRAX 



RETS 



OK, MICRO-POR DONE, DO MACRO POR 
(OR TIMEOUT) (OR SC ERROR) 



PAGE 12 



147. 
J 48. 
149. 
150. 



PR0C14G3/LIB 



151. 
Ib2. 



153. 
J54. 
155. 

156. 
157. 
158. 
159. 

160. 



161. 
162. 

163. 

164. 
165. 
166. 
167. 
J 68. 
169. 
1 70 . 

1 71 . 

172. 
1 /3. 
174. 
175. 
1 76. 
177. 

1 78. 
179» 

,180. 
181. 

182. 



000051L 

000051L 
000052L 
000053L 
000054L 
0000 55L 
000056L 
000057L 
000060L 

000061L 
000062L 
000063L 
000064L 

000065L 
000066L 
000067L 
000070L 
U00071L 

0000 72L 
0000 73L 
000074L 
0000 /5L 
0000 76L 
000077L 
OOOIOOL 

0001 OIL 
000102L 
000102L 

000103L 
0001 04L 
000105L 
000106L 
000107L 
OOOllOL 
000 1 IIL 
000I12L 
000 113L 
000114L 
000 115L 
000 116L 
000 1 1 7L 
000120L 
000121L 
000I22L 
000 1 23L 
000 I 24L 
000125L 



01010001 
01101111 
11000100 
110001 1 1 

00 1 1 000 1 
OIOIOIOJ 
00 1 101 1 1 

11001 1 II 

00 1 10001 
01 000010 
00010001 
11 000000 

1 1000100 
110001 11 
01010001 
00110111 
00 I 1 I 1 1 
01010001 
11000100 
11 0001 1 I 
00110010 
00 I 1 1 1 1 
00010001 
II 0000 1 1 
000001 10 



1 100 1 no 

1 1 110000 
11010100 
001001 11 
IJOl 1 100 
11111011 
00000100 
10100100 

00 110001 
10000000 

1 i 110000 
I 1 I I 1 00 

11001010 
001001 11 
OllOlOII 
I 1000000 
010001 1 I 
00000000 
1 1000100 

00100 1 11 
00 110 110 
00101001 

101 1 1101 
101 I 1101 
01111 101 



01010001 100 11100 



II 000 100 
II 000] I 1 
001101 II 

00 1101 11 

01 010 I 00 
01000100 
II 000000 
01010001 
00000 1 II 
11000100 
1 1 000 I I 1 
00 1 1 1 t 1 
00 110001 
OIIOl 1 11 
00 1 J 1 I 1 
01010001 
0110 1111 
11000100 
IIOOOI 11 



1 1 1 1 1 00 
001001 1 I 
11000000 
010001 II 
00000010 

01101 no 

10 1 101 00 
1 00 1 1 I 00 
Jill 0000 
I 1 1 00 1 I 
00100 1 11 
00001 100 

00 II n 

1 I 110001 
010001 11 
00 1 I 1 1 

1 1 noooo 
loioion 

00100 I 11 



DATAPOINT CONFIDHNTIAL INFORMATION - SEH PAGE 1 

MICRO-PROCESSOR EMULATION SUPPORT CODE - HJS - 
. DISPLAY - KEYBOARD SERVICE ROUTINES 






790EC12 J6«20 



lfi>a Tj2. 



• 

DL^DO* 

. 4.80 + 2.10 ON BOTLINE 

LINK^DLNL 



DLNL 



DLACNINC 



DLNXT 



DLINEOK 



BAL 

MrtAIT 

DOPIP 

BRA 

TSTIP 

LDTR 
BRA 

MrtAIT 

LDP I 



TCLR 
MrtAIT 

DOPP 

LDTR 
BRA 
I NCR 

LDTI 

MrtAIT 

LDPT 

DOT I 
TSTIT 
BRA 
LDTI 
LDRT 
14WAIT 

STB 
LDRP 

BAL 
MWAIT 



SET UP RETURN FROM KEY SERVICE 
.MEMPFDL rtAIT ON WAISTED IFETCH j 

MODrt,ND,-l-SWUSER,PSrtI DISABLE USER MODE FOR Rjkj/rtRIfES 

KBDSDO GO DO FIRST KEYBOARD SERVICE 

AC, STB OTLN, STATUS SET CARRY IF BOTTOM LINE STATUS 

PDLNP 

DLNXT, FC NOT YET 

,MEMPFDL rtAIT ON KBD STATUS BIT WRITE 

MAROL,SELFREQ,SMR GET FREQ COUNTER. SAME PAGE AS KBD STUF 



[Of I 



( 



L 






,MEMPFDL 
MDW, AC, MDR 

ACD,CC 
DLACNINC, TZ 
ACD 

SEDLBOT 

,MEMPFDL 

MAROL,SMR 

♦ SB, 2 

SB,SEDLN0I 

DLINEOK,FC 

SEDLBOT 

PDLNP 

,MEMPFDL 

I MAR 
TEMP 1 , MDR 

SMR 
LINK,DLNLR 

,MEMPFDL 



SET T-REG ZERO (NOTE* CARRY IS TRUE!!) 



ADD ONE AND RESTORE IT 

** HONEYWELL AUDIO CHANNEL TIMER •* 
DO NOT INCREMENT OF CHANNEL OFF 



POINT TO THE BOTfOM LINE ON THE SCREEN 



SET LSB OF ADDRESS AND READ ADDRESS LSB 

SUBTRACT 2 FROM LIST POINTER 
HAVE WE GONE OVER THE TOP? 

IF 50, GO BACK TO THE BOTTOM (SAFETY!) 



GET LSB OF DATA POINTER 

GET MSB ALSO 

SET UP RETURN ADDRESS (VERY EARLY!) 



( 

DATAPOINT CONFIDENTIAL INFORMATION - SEE PAGE 1 

PAGE 13 PP0CI4G3/LIB MICPO-PROCESSOW EMULATION. SUPPORT CODE - HJS - .79l)EC12 J6»20 

. DISPLAY - KEYBOARD SERVICE ROUTINES 

133. 00OI26L 00110001 00110110 LDPP MARCH, MDR GET MSB POINTER 

0U012/L 00 1101 11 111 00000 

184. 000130L 01110001 I I 110001 LDPR MAROL,TEMPI ,LDMAP AND LSB, AND STROBE TO LOAD THE DMA PNT 

000131L 00 1 101 1 1 11 000000 

000132L OOIIOI 11 01000001 
135. . BRA KBD$DO GO DO THE SECOND KEYBOARD SCAN 



PAGh 



PW0C14G3/LIB 



186. 
187. 
188. 
189. 
190. 
191. 
192. 
193. 
194. 
19b. 
196. 
197. 
198. 
199. 
200. 
201 . 
202. 
203. 
204. 
205. 
206. 
207. 
208. 
209. 
210. 
211 . 



212. 

213. 
214. 
216. 

216. 
217. 
218. 
219. 

220. 
221 . 
222. 
223. 
224. 
22b. 
226. 
227. 
228. 
229, 
230. 
231 . 



000133L 



000 1 33L 
000134L 
00013bL 
000136L 
000137L 
000140L 
000 MIL 

000142L 
000143L 
000144L 

OOOMbL 
000I46L 
000I47L 
OOOlbOL 



0001 blL 
000 1 b2L 
0001b3L 
OOX) I b4L 
0001 5bL 
000 1 56L 
0001 57 L 
000160L 
000I61L 



01010001 
00 1101 11 
01010001 
00 110 Ml 
00 1 10001 
01000101 
11 0000 1 1 

000 1 00.0 I 

01 000100 
11 000000 

00010010 
010.10010 
01101111 
11101111 



01 

II 

01 

11 

01 

11 

01 

11 

01 



010001 
00 1 1 1 1 
010001 
0011 11 
010001 

00 1 1 I 1 
010001 

001 I II 
010001 



1 1 1 00 1 
11000000 

1 1101 1 11 
1 1100000 

00 110001 
01000000 
101 00000 

10 110001 
0001 0000 

01 111000 

00 110001 

I 1 1 I 000 

1 1 110001 
00000001 



00000010 

onoiioi 

00000001 
01101101 
00000010 

oiiot no 

00001000 

01101 no 

10000000 



OATAFOINT CONFIDENTIAL INFORMATION - SEE PAGE 1 

MICRO- PROCESSOR EMULATION. SUPPORT CODE - HJS - 
. DISPLAY - KEYBOARD SERVICE ROUTINES 



79DEC12 16:20 



+ 

KBD$DO 
* * * 



OR 



4.75 
2.95 
4.85 
4.65 
0.60 
0.40 



* * * 4.20 
+ 0.15 
* 0.20 
OR 4.35 
OR 5.50 
OR 5.50 
OR 5.85 
OR 6.70 



* * * NEW KEY JUST WENT DOrtN 

THE KEY IS UP AND WAS NOT LAST TO GO DOWN 

REPEATED KEY UP 

REPEATED KEY DOWN 

IF <SPACE>, <CANCEL>, <.>, <BACKSPACE> 

IF <ENTER> 

* • * KBKSl STATUS BIT (UP OR DOWN) 

IF KBKS2 

IF STATUS BIT DOWN 

KBREINT STATUS BIT DOWN 

KBREINT STATUS BIT UP 

RESTART - IMP ZERO TO SCROM 

RESTART - NON-RPT'D INST. TO SCROM 

RESTART - RPT-^D & IMP NON-ZERO TO SCROM 



SCAN THE KEYBOARD BY» 

1) WAIT FOR THE LAST SCAN TO COMPLETE 

2) IF SPECIAL KEY, DO IT^S TYPE OF SERVICE (SET OR CLEAR STATUS BIT) 

3) IF NEW CLOSURE GET KEYCODE, SAVE IT» AND SAVE THE SCAN NUMBER 

4) IF NOT THE SAME KEY AS SPECIFIED Q'( LAST SCAN NUMBER THEN DONE 

5) IF SAME, AND STILL DOWN, SET STATUS BIT ELSE, CLEAR IT 



DLDPI MAR0,SEKBS1 

KBDWAIT TSTIP ,STKBRDY, STATUS 

BRA KBDWAIT,TZ 

TSTIR SB,16,KBSCNT,CC 

BRA KBKEY,FC 

DOTR ,AC,KBSCNT,,CO 

DORA TEMPI, AC, KBTBL 

BRR TEMP 1 



MIDDLE OF 3 BYTES THAT WILL WORK WITH 



LDTI 


SEKBDKY 


BRA 


KBKSl 


LDTI 


SEDSPKY 


BRA 


KBKSl 


LDTI 


SEFUNC2 


BRA 


KBKS2 


LDTI 


. SEFUNC4 


BRA 


KBKS2 


LDTI 


SEINTKY 



(LOOPS ONCE ON SECOND SERVICE, MAYBE) 
(NOT READY TILL 5.3 MICRO-S FROM KBSC) 

15 IT FUNCTION KEY (OR THAT GROUP?) 

NO, REGULAR KEY 

DOUBLE THE NUMBER FOR JUMP TABLE 
PUSH A BACKWARDS TABLE OFFSET 

RETURN 

INTO THE TABLE THIS IS,TO.P OF 

1 7 KEYBOARD KEY 

16 DISPLAY KEY 
15 F2 KEY 

14 F4 KEY 

13 INTERRUPT KEY 



( 
( 
( 
( 
( 
( 
( 
( 
( 
( 
( 
( 
( 
( 
( 
( 
C 



DATAPOINT CONFIDENTIAL INFORMATION - SEH PAGE 1 



PAGE 



E 15 


PH0C14G3/LIB 


MICRO-PROCESSOR 


EMULATION SUPPORT CODE 


- HJS - 79DEC12 










. DISPLAY 


- KEYBOARD SERVICE 


ROUTINES 




232, 


000162L 


11001 1 11 


0100101 1 




BRA 


KBREINT 






233. 


000163L 


01010001 


00010000 




LDTI 


SEFUNC5 


12 F5 KEY 


234. 


000164L 


11001 1 11 


01101 no 




BRA 


KBKS2 






23b. 


000165L 


01010001 


00000 I 00 




LDTI 


SEFUNC3 


1 


f3 KEY 


236. 


000166L 


1 1 00 1 1 1 1 


onot no 




BRA 


KBKS2 






237. 


0001 67L 


OlOJOOOl 


00000100 




LDTI 


SEKBRDY 


10 . .(POINT) KEY 


238. 


000170L 


11001 1 11 


1 n 1 n 




BRA 


KBREG 






239. 


000I7IL 


01010001 


00000100 




LDTI 


SEKBRDY 


7 


NO~KEY 


240. 


000172L 


IIOOI 1 11 


01110111 




BRA 


KBREG 






241. 


000 1 73L 


OlOlOOOl 


00000001 




LDTI 


SEFUNCl 


6 


Fl KEY 


242. 


000174L 


11001 1 11 


110 1 no 




BRA 


KBKS2 






243. 


000 1 75L 


01010001 


01000000 




LDTI 


SEAITKY 


5 


AliENTION KEY 


244. 


0001 76L 


11001 1 n 


01101 no 




BRA 


KBK32 






245. 


000177L 


01010001 


00100000 




LDTI 


SERSTKY 


4 


RESTART KEY 


246. 


000200L 


11001 1 M 


01 001 on 




BRA 


KBREINT 






247. 


00020 IL 


01010001 


00000100 




LDTI 


SEKBRDY 


3 


SPACE BAR 


248. 


000202L 


11001 1 11 


01110111 




BRA 


KBREG 






249. 


000203L 


OlOJOOOl 


00000 1 00 




LDTI 


SEKBRDY 


2 


BACKSPACE KEY 


250. 


000204L 


11001 1 11 


01 1101 11 




BRA 


KBREG 






251. 


000205L 


01010001 


00000100 




LDTI 


SEKBRDY 


1 


CANCFI KEY 


252. 


000206L 


noon n 


01110111 




BRA 


KBREG 






253. 


000207L 






KBTBL 










254. 


000207L 


01010001 


00000100 


KBKEY 


LDTI 


SEKBRDY 





ENTER KEY 


255. 








• 


BRA 


KBREG 







6*20 



( 
( 



( 



PAGE J 6 

256. 
257. 

258. 

259. 
260. 

261 . 
262. 
263. 
264. 
265. 
266. 
267. 
268. 
269. 
270. 
271 . 
272. 
273. 
274. 
275. 
276. 
2 77. 

278. 

279. 

280. 
281 . 
282. 
283. 
284. 

285. 

286. 

28 7. 
288. 
289. 
290. 
291 . 
292. 

293. 

294. 

295. 



FR0C14G3/LIB 



0002 lOL 
00021 IL 
0002 12L 
00021 3L 
0002 14L 
0002 15L 
0002 1 6L 
00021 7L 
000220L 



OIIOl I 11 
00 110001 
01 000 101 
11 000010 
00010001 

000 J 0000 
11 000010 
01010001 

1 1 00 I 1 1 1 



1 J 110001 
00110001 
00010000 

1100001 

1 I I 10001 
1 lOOOOlO 
0101 0001 
00001000 
01101101 



00022 IL 00 no 1 1 1 0000 1 101 



000222L 
000223L 
000224L 
000225L 
000226L 

000227L 
000230L 
00023 IL 
000232L 
000233L 
000234L 
000235L 

000236L 
000237L 
000240L 
00024 IL 
000242L 
000243L 
0002 44L 
000246L 

000246L 
000247L 
000250L 
00025 IL 
000252L 
000253L 
000254L 
0002 55L 
0002 56L 
000257L 
000260L 
00026 IL 



0110 1 1 11 
OOllOOOl 

00 110 1 1 1 
01 000101 
11 0000 10 

Oil 10001 
OIOIOOOO 
11000100 

1 I 0001 1 1 
00 1 10 I 01 
00 1 1 1 1 1 

1 1 00 1 N I 

00 1101 11 
11001 1 10 
OOllOOOl 

00 1101 II 
00010001 

000001 II 
1 1000100 
110001 II 

00 1101 II 

1 I 00 I I 1 I 
OOIIOI II 
01 I 10001 
110001 00 

n 000 I II 

00 I 1 00 1 1 
00 1101 1 I 
000 I 000 1 
00010 110 
OIOIOIOI 
OOIIOI 11 



1 I 1 1000 I 
OOllOOOl 
010001 II 
00100000 

1 I 1 1 

1 I I.I 0001 

1 1 1 1 1 1 II 

01100 110 
00100 1 11 

001 10 no 

OOIOIOOI 
1 01 000 I 

0000 1 I 00 

1.1 111 1 II 

OIOIOOOO 
00101001 
I I 11 0001 
1 1 110010 
010 110 11 
001001 II 

00001101 
010101 11 
01000 I II 
I.I II 0001 
OIOIOIOI 
00100 1 II 

001101 10 
OOIOIOOI 
1 1 IIOOOl 
01 I 10010 
00 I 1 1 I 1 1 
01000100 



DATAFOINT CONFIDENTIAL INFORMATION - Sift PAGE 1 

MICHO-PROCESSOH EMULATION SUPPORT CODE - HJS - 
. DISPLAY - KEYBOARD SERVICE ROUTINES 



79DEC12 16*20 



KBREG 



KBKS2 
KBKSI 



KBOPN 



KBGET 



KBCLS 



KBDON 



LDRT 
TSTI P 

BRA 
TSTRR 

BRA 

LDTI 

BRA 



STB 

LDRT 

LDTP 

STB 

TSTIT 

BRA 

DOTIR 

MrtAIT 

DOPP 

BRA 

STB 

DELAY 

LDPP 

LDRR 

MWATT 

STB 

DELAY 

STB 

LDTR 

MWAIT 

DOPP 

DOTRR 

DOPI 



TEMP I 

,STKBKC, STATUS 



NEW CLOSURE? 



KBGET, FZ YES, DO IT 

XR,SCANSV,KBSCNT SAME AS THE LAST KEY? 



KBDON, FZ 

SEKBDWN 

KBKSI 



DMAR 

TEMP 1 
STATUS 
SMR 

,STKBNS 
KBCLS, FZ 

,XR,03 77,TE.MPI 

,MEMPFDL 

MDW,ND,MDR 

KBDON 

I MAR 
1 

MDrt,KBDD 

SCANS V,KBSCNT 
, MEMPi^DL 

DMAR 

2 

SMR 

TEMP 1 

,MEMPFDL 

MDW,OR,MDR 

,IT,Q,KBSCNT,C1 

KBSC,ND,077 



NO, FINISHED 

YES, SAME KEY 

CONTINUOUSLY SET THE BIT IF STILL DOrtN 

CLEAR BIT CONTINUOUSLY IF UP 

IF GOES DO»VN AGAIN GET NEW CLOSURE 

RATHER THAN REPEATED CLOSURE! 



POINT TO SEKBKS2 

SAVE THE STATUS BITS 

GET THE STATUS BYfE 

KEY CLOSED? 

YES 

NO, OPEN, TURN THE BIT OFF 



BY ANDING IT OUT 

KEYBOARD CHARACTER SAVE AREA 

OUTPUT THE DATA 

SAVE THE SCAN NUMBER (FOR REPEAFS) 

*• WHAT IF 2ND SCAN SERVICE 8. LDMAP-'D 

ALREADY, IS AN EXTRA ONE OK? 
POINT BACK TO SEKBSl 

GET BIT TO SET 

SET IT 

POINT TO THE NEXT SCAN ENTRY .(CLEAR) 

KEEPING THE NUMBER IN RANGE (CARRY ALSO 



( 

DATAFOINT CONFIDENTIAL INFORMATION - SEE PAGE I 

PAGE 17 PH0C14G3/LIB M ICHO-PHOCESSOR EMULATION. SUPPORT CODE - HJ5 - 79DEai 2 16«20 

. DISPLAY - KEYBOARD SERVICE ROUTINES 

296. 000262L 000001 11 1 I 1 1 000 1 LDRT KBSCNT.CC (5.3 MICRO-SEC TIME TILL READY FROM NOrt 

297. 000263L 11101111 00000000 BRR LINK AND RETURN FROM KEY SERVICE ON ERROR TO 



r 



DATAFOINT CONFIDENTIAL INFORMATION - SEE PAGE I 



PAGE J 8 



298. 
299. 
300. 
301. 
302. 
303. 
304. 
305. 
306. 
307. 

308. 
309, 
310, 
311. 



PP0C14G3/LIB 



MICRO-PROCESSOR EMULATION SUPPORT CODE - HJS - 
. DISPLAY - KEYBOARD SERVICE ROUTINES 



79DEC.12 16120 



312. 



313. 
314. 
315. 
316. 
317. 
318. 
319. 
320. 
321 . 
322. 
323. 
324. 



32b. 

326. 
327. 

328. 
329. 



000264L 
000265L 
000266L 
000267L 
0002 70L 
000271L 

0002 72L 
0002/3L 
0002 74L 
000275L 
000276L 
000277L 
000300L 
000301L 
000302L 
000303L 
000304L 
00030&L 
000306L 



00 I I 1 1 1 

01 tX)l I 11 

00 n 0001 

00 I to 1 11 
01000101 
11000010 

0101 000 1 
110001 00 
1 1 000 1 I 1 

00 110101 

01 000000 
I 1 000010 
00 110001 
01 110000 
00 1 101 11 
010.10001 
000 I 00 10 
001101 II 
00000 1 11 



000307L 
00031 OL 
0003 IIL 
0003 12L 
0003 13L 
0003 14L 
0003 15L 
000316L 
0003 17L 
000320L 
00032 IL 



01010001 
01 101111 
01010001 
01101 1 II 
11 000100 
1 10001 II 
01 1 1001 
00 110001 
01 000101 
110000 11 
IIOOI 1 II 



0000 1 101 
1 1 II 0001 
00 110001 

01000 1 II 
00 110000 
OlOIOtlO 

101 00000 
01000100 

001001 II 
00110 I 10 
10100000 
01101000 
00 1 1 1 1 
1 1 IIOOOl 

00 I 01 001 
00000001 
00 1 1 000 I 
01 000 I 00 

1 I 11 0001 



000000 I 1 

1 1 110010 
1 1 1 1 0000 
I I 110001 

00 110100 
001001 II 

1 II I 1101 
1101 1100 
001 00000 
00010 110 

0001 1 no 



KB RE I NT 



STB 

LDRT 

LDTP 

STB 

TSTIT 

BRA 

LDTI 
MWAIT 

DOTP 
TSTIT 
BRA 
DOPRP 



DOPRI 



LDRT 



DMAR 

TEMP 1 

STATUS 

SMR 

,STKBKC+STKBNS 

KBCLS.FZ 

SEINTKY+SERSTKY 
,MEMPFDL 



SAVE THE BIT 

IN SEKBKS2 

NEW CLOSURE OR STILL CLOSED? 

YES, ITS DOrtN, SO SET IT! 



IT IS UP! SEE IF BOTH KEYS WERE DOWN 



,ND,MDR SELECT RESTART AND INTERRUPT KEYS 

XRtSEINTKY+SERSTKY WERE BOTH SET? 

KBOPN,FZ NO, ONLY ONE 

MDW,XR,TEMP1,MDR YES, TURN THE BIT OFF & DO A RESTART 



KBSC,AC,KBSCNT,I ,C0 FINISH LIKE REGULAR, BUT INLINE 



KBSCNT 



ONLY KEYBOARD INVOLVED (INLINE SRVRTW) 



. SPECIAL SERVICE REQUESTED INSTRUCTION LEVEL SYSTEM CALL INTERRUPT 

. THE P.C. MUST BE BACKED UP IF IMP NON-ZERO, TO THE IMP SPEC. 

. ELSE IT IS POINTING TO THE INSTRUCTION TO EXECUTE NEXT 

. OR BEING EXECUTED IF REPEATED. 

. NOTE* THE PRESENT WAY CODE WORKS IF NOT REPEATED (OR NOT STARTED YET) 

. THEN IMP MUST BE ZERO BECAUSE CAN-^T INTERRUPT BETWEEN IMP. SPEC & OPCODE 

. BUT CODE BELOW WILL WORK ANYWAY (TOO GENERALIZED) 

. I.E. IF IMP-NON-ZERO MUST BE REPEATED THEREFORE MUST BACK IT UP. 

SET RESTART ADDRESS 



DLDRI 


TEMP,SRRSTRT 


MWAIT 


,MEMPFDL 


BPGX 


SCDON 


TSTIP 


,SWRPT,PSWI 


BRA 


SCDON, TZ 


BRA 


SCLST 



IS IT REPEATED? 

NO, THEN P.C. POINTS TO INSTRUCTION 

YES, THEN MAY BACKUP THE PC (TO IMP SPEC) 



( 
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DATAPOINT CONFIUENTIAL INFORMATION - SHE PAGH 1 

MICrtO-PHOCtSSOR HMULATION SUPPORT CODE - HJ5 - 
. DISPLAY - KEYBDARD SERVICE ROUTINES 



79DEC12 16120 



330. 
331. 

332. 

333. 

334. 
335. 
336. 
33 7. 

338. 



>000322L 
>000323L 
00Q324L 
000325L 
000326L 
U0032/L 

000330L 
000 33 IL 
> 000 332 L 
>000333L 
000334L 
000335L 
000336L 
000337L 
000340L 
00034 1 L 
000342L 
000343L 
000344L 
000345L 
000346L 
000347L 
U00350L 
0003b IL 
0003t>2L 
000353L 
0003 54L 
000 3 55 L 
000356L 
000357L 
000360L 
00036 IL 
000362L 
000363L 
000364L 
00036bL 
000366L 
000 36 7L 
000370L 
00037 IL 
000372L 
000373L 
000374L 
00037bL 
0003 76L 
0003 77L 



010 

It 

010 

11 

010 

11 



00 



00 1 



00 
00 

1 



00 1 



00 



0.0 
0.0 
00 



00 



II II 1 1 1 
II 1 1 
1 no 

00100100 

I no 

0001 



00 










00000 



000 







* 

DLNLR 

IVIOLO 
UDOPO 



BRAX 
BRAX 
BRAX 



MEMPFDL STB 
MEMPFCF STB 
MEMPFO BRAX 



SRVNXT 
I VIOLS 
UDOP 



LDMAP 

RDLM 

MEMPF$ 



DISPLAY SERVICE FINALLY DjONE 



TAB PAGE PROCL 

I D/i: 



CLEAR INTERRUPT ON ANY MEMORY FAULT 

TURN OFF LOAD M.ODE FOR LODCF MEMORY FAULT 












{' 7" / ^ /^'s. 
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I PH0C14G3/LIB MICHO-PHOCESSOR EMULATION 3UPP0 










. SYS TAT 


& INFO SYSTEM INSTRUCT 


341. 






* 








342. 


000400L 




SYSTAT* 








343. 








.8.55 


( 


157) 


UDOP 


344. 
















34^). 








\ 1 .30 


(111 


157) 


SYS TAT 1 


346. 
















34/. 








\ 1 .50 


(062 


157) 


SYSTAT2 


348. 








. 1 .50 


( 113 


157) 


SYSrAT3 


349. 








. 1.50 


( 1 74 


1 5.7 ) 


SYSTAT4 


3b0. 








. 1.50 


( 115 


15-7) 


SYSTAT5 


351 . 








. 1.50 


(176 


157) 


SYSTAT6 


'J'dZ, 








. 1.50 


(117 


157) 


SYS TAT 7 


353, 








. 1 .50 


(022 


157) 


SYS TATS 


354. 
















355. 


000400L 


11001001 


00101001 




BRA 




UDOP0,f§,IZ 


356. 


00040JL 


00 I 1 1 1 1 


00001001 




STB 




DIMP 


357. 


000402L 
000403L 


01010001 
00 1101 It 


010001 11 
10000010 




LDP I 




URO+URC,PRE 


358. 


0004 04L 


00 11 OOX) 1 


110 11100 




LDTP 




PSrtI 


359. 


U00405L 


11011001 


t not 001 




BRA 




SYSTND,Te,IZ 


360. 


000406L 


01010001 


00000000 




TCLR 






361. 


000407L 


1101 1 1 11 


1 1101 001 




BRA 




SYSTND 


362. 






* 








363. 


000410L 




] 


[NFO« 








364. 








. 0.50 


( 


010) 


NOP 


365. 








1.35 


(111 


010) 


INFO 


366. 








1.90 


(062 


0.10) 


INF02 


367. 








. 1.90 


( 1,13 


010) 


INF03 


368. 








1.90 


(174 


010) 


I NF04 


369. 








1.90 


(1.15 


010) 


INF 05 


370. 








1.90 


(176 


010) 


I NF06 


371. 








. 1 .90 


( 117 


010) 


INF 07 


3J2, 








1.90 


(022 


010) 


I NF08 


373. 


0004 lOL 


11011001 


1 1101 000 




BRA 




INFNO,T#,IZ 


374. 


00041 IL 


00 1101 11 


00001001 




STB 




DIMP 


375. 


000412L 


01010001 


00000010 




LOT I 




VER 


376. 


000413L 


110 11000 


1 1 110000 




BRA 




INFEXT,F@,IZ 


311. 


0004 14L 


00 1101 11 


10000000 




LDPT 




URO+URA 


378. 


0004 15L 


01010001 


00001 100 




LOT I 




REV 


379. 


0004 16L 


110 11111 


1 not 001 




BRA 




I NFEND 


38.0* 


0004 I 7L 


00 1 1 1 1 1 


00001001 ] 


[NFEXT 


STB 




DIMP 


381. 


000420L 
00042.1 L 


01010001 
001 101 It 


00000000 
t 0000010 




LDPI 




URa-fURC,0 


382. 


000422L 


001 tot 11 


100000 It 




LDPT 




URO+URD 


383. 


000423L 


00 not It 


10000100 




LDPT 




URO+URE 


384. 


000424L 


110 11 000 


1 not 001 




BRA 




INFEND,F@,IZ 


385. 


000425L 


oiotooot 


00 110000 




LDTI 




CAPABILI 


386. 


000426L 




c 


JYSTNU 








387. 


000426L 


00 1 1 1 1 1 


1 000000 t ] 


NFEND 


LDPT 




URO+URB 


388. 


> 00042 7L 
>000430L 


1 1 1 OX) t 
1 1 00 1 1 1 t 


11111111 J 
1 1 11 1 1 11 


[NFNO 


BRAX 




FETCHN 



CODE - HJS - 
JS ( 157, 010 



79DEC 1 2 
OP-CODES) 



16*20 



UNDEFINED QP-CODE 
PROCESSOR STATUS WORD 



SYSTEM STATUS (UNUSED 
C <~ 0; B •<- 



0) 



(IF PRE-RELEASE, C <- PRE-RELEASE CODE) 
(SO CAN TELL PRE-RELEASE LEVEL) 



157 ALONE IS UNDEFINED 

CHECK 1 I 1 

WHATEVER ELSE, C=PRE-RELEASE LEVEL 

(ASSUME 1) 

^ILL BE 062 - 022 



NO-OP (STROBE ON 2200) 

A = VERSION #, B = REVISION # 

B = CAPABILITIES, CDE=0 

BCDE = (CAPABILITIES) 

BCDE = 

BCDE = 

BCDE = 

BCDE = 

BCDE = 

CHECK IF ITS 1 (111) 

(ASSUME SO) 

NO SEE IF 2 OR ABOVE 

SET PR.OCESSOR VERSION AND REVISION LEVE 

CHECK IF ITS 2 .(062) 

SET CDE = IN ANY CASE 

rtAS IT 062 OR OTHER? 
YES, 062 SET CAPABILITIES 

SET B-REGISTER 
AND DONE 



rl 
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PriOC14G3/LIB 


MICHO-Pl 


^OCESSOR 


EMULATION SUPPORT C 










. LOAD CHARACTER 


FONT 


391 . 








* 






392. 


00043 1 L 






LODCFi 






393. 








• 


( 155) LODCF 


394. 








. 18.90 


+ A * 0. 


15 + 0.40 IF A > 64 


395. 








- 1 


.0 IF A = 


64 


396. 








• 






397. 














398. 


00043 IL 
000432L 


00 1 1 OOD 1 
0100010,1 


1 1 1 1 1 00 
000001 00 




TSTIP 


,SrtUSER,PSriI 


399. 


0004 33L 


11000010 


001010 11 




BRA 


IVIOL0,FZ 


400. 


000434L 


00 1101 11 


0.1 0000 1 1 




STB 


SDLM 


401 . 


000435L 
000436L 


00 1 10001 
01010101 


1101 0000 
01 11 1 1 11 




DOT IP 


,ND,0177»URI + URA 


402. 


000437L 


000101 11 


10110010 




CCLR 




403. 


000100 






LODSTEP 


EQU 


64 


404. 


000440L 


OlOiOlOO 


01000000 


LDCFPT 


DOTI 


, SB, LODSTEP 


405. 


000441 L 


11010001 


10000001 




BRA 


LDCFNL,TC 


406. 










LIST 


-G 


407. 








LDCFLP 


RPT 


LODSTEP/2 


408. 


000442L 


00 1101 11 


01000010 




STB 


SKCH,SKCH 


409. 










LIST 


G 


410. 


000542L 


11010010 


1101 1 1 11 




BRA 


LDCFPT tFZ 


411 . 


000543L 


00 1 10 1 1.1 


0010 I 110 




STB 


SLDCH 


412. 


000544L 


11011111 


10011010 




DELAY 


2 


413. 


000545L 
000546L 


001 101 1 1 
00 1101 1 1 


0010 1 1 1 1 
00 1 1 1 1 




STB 


RLDCH, SLDCH 


414. 


000547L 
000550L 


OlOlOOOl 
00 1 1 1 1 1 


00000 1 11 
00000001 




LDP I 


LIMP. 7 


415. 


000 551L 
000552L 


00 1 1 I 1 1 
00 1101 11 


00101 1 11 
00 1 1 1 1 




STB 


RLDCH, SLDCH 


416. 


000553L 


11001110 


11111111 




DELAY 


1 


41 /. 


000554L 


00 110001 


1.1100101 




LDX 


HL2MRH 


418. 


000 555L 


00 1101 11 


00101 1 11 


LDCFLD 


STB 


RLDCH 


419. 


000556L 
00055.7L 


001 10001 
00 110 Ml 


11000110 
010001 11 




LDX 


HL2MRL,SMR 


420. 


000560L 


00 1 1 1 1 1 


00001001 




STB 


DIMP 


421. 


00056 IL 
000562L 


IIOIOJOO 
110001 11 


1000 1 no 

00100 110 




MrtATT 


,MEMPFCF 


422. 


000563L 


00 1101 11 


0000 1100 




STB 


I MAR 


423. 


000564L 


00110001 


10000 110 




LDX 


MR2XXL+URL 


424. 


000565L 
000566L 
00056/L 


00 110001 
00 1101 11 
00 1101 11 


00 110 110 
11000000 

0010 1 no 




LDPP 


MAR OL,MDR, SLDCH 


425. 


000570L 


11011000 


10010010 




BRA 


LDCFLD, F#, I Z 


426. 


00057 IL 


00 11 000 I 


10100101 




LDX 


MR2XXH+URH 


427. 


000572L 


00 1 1 11 1 


00 1 1 1 11 




STB 


RLDCH 


428. 


000573L 


00 110 111 


01000101 




STB 


RDLM 


429. 


>000574L 
>000575L 


oionooi 

1 1 00 1 1 1 1 


1 1 1 1 1 1 11 
1 1 1 1 1 1 11 




BRAX 


FETCH 



/9DEC12 16x20 



LOAD CHARACTER FONT 
FONT (A) <- (HL-6 I ML) 



PUT IT IN LOAD FONT MODE 



** SET BY HOW MUCH ROOM THERE IS •• 
COUNT IN STEPS OF ^'LODSTEP-" 
IF AT END. DO FINAL STUFF 

THERE ARE -"LODSTEP^ STROBES IN THE SPEEDUP 



DONE AND DONE WELL (I HOPE) 

DO INITIAL THREE COUNTS 

YAWN - YAWN 

EMD FIRST CHARACTER-SCAN LEVEL STEP 

SET UP FOR 7 ROWS PER FONT 

END THE SECOND AND DO THE. THIRD 

YAWN 

I NIT MARH TO FONT STRING 

RESET FONT LOAD BEFORE CHANGE MAROL 

NOW CAN FINALLY START ACTUAL FONT LOAD 

LOADING MARL >400 nS AFTER LDCH 
IF ERROR. RESET LOAD MODE 



UPDATE HL THE FASTEST WAY 

GET THE CHARACTER OUT AND LOAD THE FONT 



LOOP TILL ALL SEVEN ROWS DONE 

GET NEW HL CAUSE L UPDATED 

RESET FONT LOAD 

RESET LOAD MODE O400 nS AFTER LDCH) 
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PrtOCJ4G3/LIB 



MICRO-PROCESSOR EMULATION SUPPORT CODE - HJS - 
. LOAD CHARACTER FONT 



790EC12 J 6*20 



430. 








431 . 


000D.76L 






432. 








433. 








434. 








435. 








436. 


0005.76L 


01010010 


110 1 1100 


437. 


U00577L 


01 101111 


10 110000 


43b. 


000600L 


01010001 


00000000 


439. 


00060 IL 


11101111 


00000000 



* 

LDCFNL 

. FOR THE FINAL STEP ONLY GO PARTIALLY THROUGH THE LOOP 
T >=0=1£) STEPS, -1=9 STEPS, -2=8 STEPS, , 
SKIPS STEPS, 1 STEP 2 STEPS, . 



-9=1 STEP 
9 STEPS 



DOTA 
BAS 
TCLR 
BRR 



,AC,LDCFLP+1 
LINK,CC 

LINK 



ADDS ADDRESS TO NEGATIVE VALUE (CRY SET 
MOVES FORWARD FROM LDCFSK (1 TO 9 STEPS 
MARK ENDED 
DO AS MANY STEPS AS NEEDED 



#^ 
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442. 
443. 
444. 
44b. 
446. 



PH0C14G3/LIB 



MICriO-PROCESSOR EMULATION SUPPORT CODE - HJS - 
. DMP I/O INTERFACE INSTRUCTIONS 



79DEC12 16*20 



447. 

448. 
449. 
450. 

451. 

452. 

453. 
454. 
455. 
456. 
457. 
458. 

459. 
460. 
461 . 
462. 

463. 

464. 



465. 

466. 
467. 
468. 
469. 
470. 

471. 

472. 
473. 
474. 



475. 
476. 
4 77. 



000602L 



000602L 
000603L 
000604L 
000605L 
000606L 
000607L 
00061 OL 
00061 IL 
0006 I2L 
000613L 
>000614L 
>0006I5L 

000616L 



0006 16L 
00061 7L 
000620L 
00062 IL 
000622L 
000623L 
000624L 
000625L 
000626L 
000627L 
000630L 
00063 IL 
000632L 
>000633L 
>000634L 

000635L 



000635L 
000636L 
000637L 
000640L 
00064 IL 
000642L 
000643L 
000644L 
000645L 
000646L 
00^647L 
000650L 
00065 1 L 



00 110001 
00 1 I I 1 1 
00110001 
1 000 1 01 
11000010 
110 1 1101 
001 10001 
00 1 101 11 
00 1 1 000 1 

00 1 ion 1 

010 11 00 1 
1 1 00 1 1 1 1 



00 no 1 1 1 

00 110001 
01010101 
00 1 101 11 
11 000010 
11011101 
llOJOl 00 
1 1 000 1 1 t 
00 110001 
00 1101 11 
00 1 10001 
00 I 101 I 1 
00 1 I 1 1 ] 

010 11001 

1 1 00 I 1 1 1 



00 1 10001 
00 1 t 1 1 1 

00 110001 
0100010.1 
11000010 

no 1 11 01 
00 noooi 
001101 n 
00 no 111 

11001 1 10 

noiiioi 

001 10001 
00 110 1 11 



110100 11 
01001000 
1 1 1 11 00 
00000100 

00 101 on 

11 11 000 

n 1 1 00 

01 00 I 001 

1101 1 1 n 

01 001 010 

11111111 
11111111 



010001 11 

n 1 1 1 00 

00000100 

1 00 1 000 
001010 11 

1 1 n 00 

01101011 
00100101 

00 1 10 no 

01 00 100 I 
11011111 
01001010 
0000 I 100 

11111111 
1 1 1 1 1 1 11 



not 00 11 

01001000 

n 1 11 00 

00000100 

001010 n 

0101 1101 

n 01 01 00 

01001001 

01 on 000 
1 1 111 1 n 

010 11000 
010 11001 
1 000 1 I 1 1 



DMPOUTi 
. 1 .65 



DM PS OUT* 
. 2 . 00 



\. 



* 

DM PIN* 

. 2.00 



( 
( 



(IMP 145) DMPOUT 

LDPP DMPADH»URI+URD 

TSTIP ,SWUSER,PSWI 

BRA IVIOL0,FZ 

BRA $»T@,BR 

LDPP DMPADL,URI+URE 

LDPP DMPDTO^IMPI 

BR AX FETCHN 

(IMP 147) DMPSO PPP 



(DE) <- (R); ONTO THE DMP BUS 
SELECT DEVICE 



BUT, MUST BE PRIV-'D 
WAIT FOR BUS READY 
SELECT ADDRESS/FUNCTION 

OUTPUT DATA & PERFORM FUNCTION 



STB 
TSTI P 

LDPT 
BRA 
BRA 
MrtAIT 

LDPP 

LDPP 

BRAX 



iPPP) <- .(R)l OUTPUT TO DMP BUS 
GET THE ADDRESS LSB 



SELECTED MSB ADDRESS IS ZERO 

BUT, MUST BE PRIV'D 

rfAIT FOR DEVICE READY TOO 



SMR 
,SWUSER,PSWI,rw 

DMPADH 
IVIOL0,FZ 
$,T@,BR 
,M£MPFO 

DMPADL,MDR 

DMPDTO,IMPI,IMAR OUTPUT THE DATA & GO FOR NEXT INSTRUCTION 



FETCHN 



(IMP 141) DMP IN 

LDPP DMPADH, URI+URD 

TSTIP ,SrtUSER,PSrtI 



(R) <- (DE); INPUT FROM THE DMP BUS 
SELECT DESIRED DEVICE 



BRA 
BRA 

LDPP 



NOOP 

BRA 

LDPP 



IVIOL0,FZ ONLY IF ALLOWED TO 

$,re,BR AND WAIT FOR IT TO BE READY 

DMPADL,URI+URE,DMPRDS SELECT ADDRESS /FUNCTION TO BE INPUT 



$,T@,BR 
IMPO,DMPDTI 



FINALLY GET THE DATA 



OATAFOINT CONFIUENflAL INFORMATION - SEE PAGE 1 
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MICRO-PHOCESSOH EMULATION SUPPORT CODE - HJ5 - 
. DMP I/O INTERFACE INSTRUCTIONS 
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478. 

4/9. 
480. 
481 . 
482. 
483. 
484. 

48b. 
486. 
487. 
488. 

489. 



490. 
491 . 
492. 

493. 

494. 
49t>. 
496. 
49 7. 
498. 
499. 
500. 
501 . 

502. 

503. 
504. 

505. 
506. 
507. 

508. 

509. 

510. 
511. 
512. 
513. 
514. 

515. 



>000652L 
>U00653L 

000654L 



000654L 
000655L 
000656L 
000657L 
000660L 
000661L 
000 662 L 
000 663 L 
000664L 
000665L 
000666L 
U00667L 
000670L 
00067,1 L 
000672L 
>000673L 
>000674L 

000675L 



000675L 
000676L 
0006 77L 
000700L 
000701L 
000 702L 
000703L 
000704L 
000705L 
000706L 
000707L 
000710L 
0007 ML 
000712L 
000 7I3L 
0007 14L 
000715L 

0007 15L 
0007 16L 
00071 7L 
000720L 



01 on 001 
11 001 1 I 1 



00 1 101 11 
00 I I 0001 
0101010.1 
00 1101 It 
II 000010 
110 illOl 
11010100 
110001 I I 
00 1 10001 

00 1101 11 

001 101 11 
I 1 00 I I 1 

no 1 1 101 

00110001 
00 1 I 1 I 1 
01011 001 

1.1 on 1 1 1 1 



00 110001 
00 110001 
00 1 10001 
00 1 1 1 1 I 
001 10111 
00 1 1 000 1 
01000101 
II 000010 

1101 not 

00 110001 
001101 1 1 
11010100 
11000 1 1.1 

00 110001 

001 101 11 
0110 1111 



00 
00 
00 

00 



10111 
10001 
10001 
10001 



11111111 
11111111 



010001 11 
1101 1 100 
00000100 
01001000 
001010 It 

0100 1 no 

01 00 I I 1 
00100101 

00 11 n 

01001001 
010 11000 

1 1 1 1 1 1 11 

01000 1 11 
010 11001 
10001 1 11 

1 1 1 It 1 1 1 
111 11 1 1 1 



1 1000 110 
I I 100101 
1101001 I 
01001000 
010001 It 

not I too 

00000100 

ooioion 
00 1 not 
not 01 00 

01001001 

00 110 1 It 
001 001 01 

00 no I to 

01 00 I 010 

1 1 110001 



0000 1 too 
1 0000 no 

10100101 
1 1000100 



BRAX 



FETCHN 



DMPSIN* 
. 2.20 



(IMP 143) DMPSIN PPP 



STB 
TSTIP 

LDPT 
BRA 
BRA 
MWAIT 

LDPP 



NOOP 

BRA 

LDPP 

BRAX 



* 

BLKOUT* 



( 



. 0.10 .+ 5.05 * 

DLDX 

LDPP 

STB 
TSTIP 



BRA 
BRA 
LDPP 

MWATT 
LDPP 

LDRT 

BLKLOOP 

.2.95 (RPT) , 2. 
STB 
DLDX 

DLDX 



SMR 
,SrtUSER,PSWI,TW 

DMPADH 
IVIOLO.FZ 
$,T@,BR 
.MEMPFO 



(R) <- (PPP); FROM DMP BUS 
GET THE PORT ADDRESS 



ZERO TO MSB ADDRESS 
ONLY IF ALLOWED TO 
AND rtAlT FOR IT TO BE READY 



DMPADL,MDR,DMPRDS SELECT ADDRESS/FUNCTION TO BE INPUT 



$,T§»BR 
IMPO,DMPDTI 

FETCHN 



FINALLY GET THE DATA 



173) BLKOUT 

C - 0.6 IF MATCH 
HL2MR 
DMPADH, UR I +URD 

SMR 

,SrtUSER,PSrtI 

IVIOL0,FZ 

$»Te,BR 

DMPADL,URI+URE 

.MEMPFO 
DMPDTO,MDR 

TEMPI 



T <- (DE) <- (HL)I OUTPUT TO DMP BUS 
DE <+ 1 I HL <* 1 ; C <- C - 1 
UNTIL (T + B = 0400) OR iC = 0) 



GET DATA TO OUTPUT 

SELECT DEVICE TO OUTPUT IT TO 



ONLY IF PRIV^D 

rtAIT FOR BUS READY 
FINISH ADDRESS SELECT 



OUTPUT THE DATA & SAVE IT TOO 



45 (MATCH), 3.05 (END) 
I MAR 



MR2HL 
DE2MR,,IMAR 



OPDATE HL & DE ADDRESS POINTERS 



( 
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516. 

517. 

518. 
519. 
520. 
521. 



522. 
523. 
524. 
525. 

526. 

527. 

528. 

529. 
530. 
531. 
532. 
533. 
534. 
535. 
536. 

537. 

538. 
539. 
540. 

54 1 . 

542. 
543. 

544. 
545. 

546. 
547. 



000/2 IL 
U00 722L 
000723L 
000 724L 
000 /25L 
000726L 
000 /27L 
000730L 
000/31L 
000732L 
000733L 
000 734L 
000 735L 
000736L 
000737L 
000 740L 
000741L 
>000742L 
>000 743L 
000 744L 
000745L 
000746L 
>000 747L 
> 000 750 L 

000751L 



00075.1 L 
000 752L 
000 753L 
000 7D4L 
000 755L 
00X)756L 
000757L 
000760L 
000761L 
000 762L 
000763L 
000764L 
000765L 
000 766L 
000767L 
000 770L 
000 771L 
000 7 72 L 
00£) 773 L 
000 774L 
000 775L 



00 1 
00 1 
00 1 
00 1 

00 1 

01 1 
110 



10001 
101 11 
lOOOl 
10001 
10001 
1 00 1 
10000 



1 1 1 00 1 I 
00010 111 
00 1 10001 
010101 00 
001101 1 1 
II 01 00 11 
00 110001 
1101 0010 
00 1 1100 I 
lOlOll II 
010 11001 

II 001 1 n 

00 1 100.01 
01010101 
00 1 101 II 
01011001 
1 1 00 1 I I 1 



00 110001 
00 1101 I I 
00 110001 
01000101 
11000010 
1101 1101 
00 1 J 0001 
001101 II 
00 1 10 I 1 I 
00 I I 0001 
00 1 10001 

noil loj 

00 II 000 I 
00 1101 II 
OIJOl I II 
1 1 1 I 00 
11 000 I I ] 

no 1 1 1 1 1 
1 1 1 1.1 1 II 
1 1 1 1 1 1 1 1 
1 1 1 1 1 1 II 



I 11000 11 
00001 100 
10000100 
101 000 1 I 
1101 0001 
00000001 
00100101 
000 I JO I I 
10110010 
11010010 
00000001 
10000010 
000 11011 
00 11 0000 



000 1 
00 11 
00 11 

nil 
1 1 1 1 
no I 

1101 
1000 

1 1 1 1 1 1 II 
1 1 1 1 1 1 II 



IIOI 
0100 

00 11 

1 1 11 

Mil 
1100 

1 1 11 

1 1 00 



1 101 00 I I 
01 00 1 000 
1101 1100 
00000100 
001010 11 
0001 0001 
I 1 1 I 00 
0.1001001 
OJOll 000 
I 10001 10 
I 1100101 
00001011 
010 I I 001 
00101001 

1 1 n 0001 

00000 1 11 
00100101 
00 11 00 10 

I.I 1 1 1 1 1 1 
1 1 1 1 1 1 11 
1 1 1 1 1 1 II 



BLKGO 



BLKRPT 
BLKENO 



DLDX 

TSTRP 

BRA 
BRA 
CCLR 
OOP IP 



BRA 
TSTPT 
BRA 
BRPX 

BRAX 

DOPIP 



BRAX 



MR20E 

AC/fEMPl ,URI.+URB,C0 TEST B-COMPLETION 

BLKGO, FC 
BLKEND,TZ 



UR0+URC,SB,1 »URI+URC 



COUNT DOWN IN C 



BLKEND,TZ 
FI.SRVREQ 
BLKRPT, FZ 
IDCOD 



CAN WE REPEAT QUICKLY^ 

NO 

YES 



SRVRPT DO SERVICE AS NEEDED 

PSWO,ND,-J-SWRPT,PSWI 

FETCH 



* 
BLKIN» 



C 



177) BLKIN 



. 0.10 + 5.75 * C - 0.60 IF MATCH 
LDPP DMPADH,URI+URD 

TSTIP ,SWUSER,PSWI 



BRA 
BRA 
LDPP 



DLDX 



T <- (HL) <- (DE); FROM DMP BUS 
HL <+ I ; DE <+ 1 I C <— 1 
UNTIL (T + B = 0400) OR iC = 0) 



SELt;CT DEVICE 



CONTINUE ONLY IF PRIV-'D 



IVIOL0,FZ 

$,T§,BR 

DMPADL,URI+URE,DMPRDS SELECI ADDRESS/FUNCTION AND READ 



HL2MR 



BRA 
LDPP 


$,Te,BR 
MDW,DMPDTI 


LDRT 
MWAIT 


TEMP 1 
,MEMPFO 


BRA 


BLKLOOP 



GET THAT DATA & WRITE IT TO MEMORY 



WAIT FOR COMPLETION 



TABPAGE PROCL 



DATAPOINT CONFIUENTIAL INHOHMATION - SEE PAGE 1 
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PH0C14G3/LIB 



MICH0-PH0CE5S0R EMULATION- SUPPORT CODE - HJS - 
. DMP I/O INTERFACE INSTRUCTIONS 



79l)EC12 J 6*20 



000 776L 11.111111 11111 
000 777L II 1 1 I 1 It Mill 



( 
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550. 
551 . 
552. 
553. 
554. 
555. 
556. 

557 . 
558. 
559. 
560. 
561. 
562. 
563. 
564. 
565. 
566. 
567. 
568. 

569. 
5/0. 
571. 
572. 
573. 
574 . 

575. 

5 76 . 
5 77. 

578. 

579. 
580. 

581 . 



PR0C14G3/LIB 



001 OOOL 



OOIOOOL 
OOIOOIL 
001002L 
00 1 003L 
001004L 
001005L 
001 006L 

001 007 L 



00 110001 
01 000 101 
11000010 
01000101 
11 000010 
0101 000 1 
11001 1 11 



1 1 1 I 1 00 
00000100 
00100100 
00001000 

II noon 

00000 I JO 

00 1 0000 I 



001 
001 
001 
001 
001 
001 
001 
001 
001 
>00l 
>00l 



00 7L 
OIOL 
OIIL 
0I2L 
013L 
0I4L 
015L 
016L 
1 7L 
020L 
021L 



001022L 

001023L 

>001024L 

>001025L 

001026L 

001027L 

>001030L 

>001031L 



00 1 1 000 1 
01000101 

n 000010 

01000101 
1 1 0000 I 1 
01000101 
11 0000 11 
00 110001 
00 1 101 1 1 
01011001 

n 001 1 11 

00 110001 

00 1 1 1 i I 

1 11 0.0 1 
1 1 00 1 I 11 

OiOIOOOl 

00 1 1 1 n 
010 t loot 

11001 I 11 



1 1 1 I 1 00 
00000100 
00100100 
00001000 
1 1101 001 
00010000 
1 1101 101 
01010010 
I 0001 1 11 

1 1 1 1 1 1 11 
1 1 1 1 1 1 11 

01010011 

10001 1 n 
1 1 1 1 1 1 11 
11111111 

00000000 

1 oojo 1 1 n 
1 1 1 1 1 1 11 
11111111 



UATAPOINT CONFIDENTIAL INFORMATION - SEE PAGE 1 

MICrtO-PHOCESSOR EMULATION SUPPORT CODE - HJS - 
. INPUT OUTPUT OPERATIONS 



79DEC12 16x20 



PIN* 

( 103) PIN PARITY CHECKING INPUT 

(IMP 103) PINR (R) <- INBUS; PARITY CHECK 

. .1.45 (DATA); 1.55 (STATUS.).; 1.30 (NON-RIM) 



PFMIN 

* 

INPUT* 



TSTIP ,SrtUSER..PSrtI 

BRA IVIOL$.FZ 

TSTir .SrtlRIM 

BRA INPRIM,FZ 

LDTI SVINP 

BRA SCLSTW 



( 101) IN 

(IMP 101 ) INR 



CONTINUE ONLY IN PRIV'D MODE 

ONLY OPERAfE IF RIM DEFINED 

PIN OR MIN TO NON HIM IS PARITY FAULT 



INPUT FROM 5500 BUS 
(R) <- INBUS 



1.35 (DATA); J. 45 (STATUS); 1.20 (NON~RIM) 



INPRIM 



INSTAT 



INPZRO 



TSTIP 



BRAX 



»SrtUSER,PSrtI 



BRA 


IVIOL$,FZ 


TSTIT 


,SWIRIM 


BRA 


INPZRO,TZ 


TSTIT 


tSWSTDT 


BRA 


INS TAT, TZ 


LDPP 


IMPO.RIMDATI 



FETCHN 



LDPP 


IMPO,RJMSTAI 


BRAX 


FETCHN 


LDPI 


IMPO,0 


BRAX 


FETCHN 



CONTINUE ONLY IN PRIV-'D MODE 

ONLY OPERATE IF RIM DEFINED 
WANT STATUS OR DATA? 
GET RIM DATA 



GET RIM STATUS 



GET DATA OF ZERO - THERE IS NO I/O BUS! 



UATAPOINT CONFIDENTIAL. INFORMATION - SEF PAGE 1 
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582. 
b83. 
b84. 
58b. 
586, 
587, 
588. 



PR0C14G3/LIB 



MICHO-PROCESSOR EMULATION SUPPORT CODE - HJS - 
. INPUT OUTPUT OPERATIONS 



/9DECI2 16»20 



589, 
590, 

59). 



592. 

593. 
594. 
595. 
596. 
597. 
598. 
599. 
600. 
601 . 
602. 
603. 
604. 
605. 

606. 
607. 
608. 

609. 
610. 

611. 
612. 
613. 
614. 
615. 
616. 

617. 
618. 
619. 

620. 



001032L 



001032L 
001033L 
001034L 
001035L 
001036L 
001037L 
001040L 
U01041L 
001042L 
001043L 
001044L 
001045L 
00 1 046L 
001047L 
001050L 

001051L 
001052L 

001053L 



001053L 
00 1 054L 
0010 55L 
001056L 
001057L 
001060L 
001061L 
>001062L 
>00ia63L 

00 1 064L 



0OI064L 
001065L 
001066L 
00106 7L 
001070L 
001 071 L 
>001072L 
>0010/3L 



00 11 0001 
01000101 
11 000010 
01010101 
00 1 101 1 1 
01010001 
00 1101 11 



010 
00 1 

00 1; 

00 1 



0001 
0111 
0001 
0111 



01000000 
11 000010 
01010001 
I 1001 1 11 

01010001 
11001 1 11 



00 110001 
01000101 
11 000010 
01010001 
00110101 
00 1 101 1 1 
00 1 1 1 1 1 
OlOllOOl 
11001 1 II 



00 1 1 000 1 
01000101 
11000010 
01010001 
00 1 1 00 1 1 
00 1 I I 1 1 
010.11001 

noon 11 



11 I 1 1 00 
00000100 
00100100 

1 1101 1 n 

1 000 11 00 
10101010 
11000000 
1 11 I 1 1 1 
1 1100000 

1101 1 1 n 

00101 001 
1 00 1 1 1 00 

iioiono 

00001 000 
11000 1 11 



1 1 

10 



0111 
0000 



1101 II 
000001 
001001 
111011 
1101 II 
100011 
000001 

1.1 11 II 
mill 



00 
00 
00 

11 

00 
00 
00 

11 
11 



11 1 1 1 00 
00000100 

00 I 00 1 00 
00010000 
1 1 1 1 1 00 

1 000 I I 00 

11111111 
1 1 II 1 1 11 



EX ADR* 

( 121) EX ADR 

(IMP 121 ) EX ADR 

. 2.50 C^i*i); 2.75 (NON-RIM) 




ADR N ON 

* 

EXSTAT* 
. 1.20 
. 1.20 



PSWND 



* 

EXDATA* 
. I .05 
. 1 .05 



C0M4X 
PSWOR 



TSTIP 

BRA 
DQPI 

DLDPI 



LDPP 

TSTIT 
BRA 
LDTI 
BRA 

LDTI 
BRA 



( . 123) 
(IMP 123) 

TSTI P 

BRA 

LDTI 

DOPP 

LDPT 
BRAX 



( 125) 

(IMP 125) 

TSTIP 

BRA 

LDTI 

DOPP 

BRAX 



»SrtUSER»PSrtI 



SELECT DEVICE (AND PUT IN STATUS MODE) 
(SEXADR) <- OUTBUS <- (R) . ^ 

\ -^^ ^ 
SHOULD I HAVE DONE THAT? 



IVIOL$tFZ 

PSrtO,ND,-l-S,WSTDT MARK IN STATUS MODE ^ 

MARO, SEXADR 



MDrt,IMPI 

XR,RIMADR 
ADRNON»FZ 
SWIRIM 
PSrtOR 

-1-SrtJRIM 
PS rtND 



EX STATUS 
EX STATUS 

,SWUSER,PSrtI 

IVIOL$,FZ 
-l-SrtSTDT 
PSWO,ND,PSrtI 

MODrt 
FETCHW^ 



EX DATA 
EX DATA 

,SrtUSER,PSrtI 

IVIOL$,FZ 

SWSTDT 

PSrtO,OR»PSrtI 

FETCH »V<^2_. 




^^ 



y 



ccTI 






j> ' r 



OUTPUT ADDRESS TO ITS SAVE AREA 
IS THE RIM BEING ADDRESSED? 
YES, MARK AS ADDRESSED 

NO, CLEAR MARKINGS 



PUT IN STATUS MODE 
OUTBUS <- (R) 

SHOULD I HAVE DONE THAT? 



CLEAR STATUS (SET DATA) MODE 
MARK IN STATUS MODE 



** FETCH W^'OR EX ADR ONLY ** 



^•^ 



PUT IN DATA MODE 
OUTBUS <- (R) 

SHOULD I HAVE DONE THAT? 



MARK IN DATA MODE 



•• FETCH ^IH FOR EX ADR ONLY ** 



'5 



r 



UATAPOINT CONFIDENTIAL INHOHMAIION - SEE PAGE I 
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PR0C14G3/LIB 



MICHO-PHOCESSOH EMULATION SUPPORT CODE - HJS - 
. INPUT OUTPUT OPERATIONS 



79DEC12 16*20 



621. 
622. 
623. 
624. 
625. 
626. 
627. 

628. 
629. 
630. 
631 . 

632. 

633. 
634. 
635. 
636. 
637. 
638. 
639. 

640. 
641 . 
642. 
643. 

644. 
645. 
646. 
647. 
648. 
649. 
650. 
651 . 
652. 
653. 
654. 
655. 
656. 

657. 
658. 



001074L 



001 
001 
001 
001 
00 1 
00 1 
00 1 
>00 1 
>00l 



74L 
075L 
0/6L 
77L 
lOOL 
lOJL 
102L 
103L 
104L 



001105L 



00 1 
001 
001 
00 1 
OD 1 
00 1 
00 1 
00 1 



105L 
106L 
J 7L 
IIOL 
IllL 
112L 
I13L 
1I4L 



001 I15L 



00 1 H5L 

00 1 I16L 

00 1 1 1 7L 
>00 1120L 
>001121L 



00 11 0001 
I 000 1 1 
11000010 
01 0001 01 
11000011 
00 1.10001 
00 1 1 I 1 I 
OlOIIOOl 
M 00 1 1 I 1 



00 1 1 000 1 
01000101 
11 0000 10 
01000101 
11 0000 11 

00 11 0001 

001 101 II 
IIOOII II 



00 110001 
01000101 
1 10000 10 
OlOIIOOl 
1 1 00 I I 1 1 



] 1 I 1 1 00 
00000100 
00100100 
00001000 
10101 I It 
1 1 1 I I 1 1 
00101000 

1 1 II 1 1 11 
It III t II 



not 1 100 

00000100 
00100100 
00001000 
I 1 I t 1 1 
tlOl 1 I I I 

0010 1 too 

11 00 1000 



not I too 

00000100 
00 I 00 I 00 

1 1 1 1 1 1 II 
1 1 1 1 1 1 II 



EXrtRITEi 

( 127) EX WRITE 
UMP 127) EXr WRITE 

. 1.15 <RIMJ; 0.95 (NON-RIM) 

TSTIP ,SWUSER,PSWI 

BRA IVIOL$,FZ 

TSTIT »SrtIRIM 

BRA IRIME.TZ 

LDPP RIMDATO,IMPI 

BRAX FETCHN 

* 

EXC0M4* 

( 137) EX COM4 

(IMP 137) EXr COM4 

. I. .75 (RIM); 0.95 (NON-RIM) 

TSTIP ,SWUSER,PSrtI 

BRA IVIOL-$,FZ 

TSTIT ,SWIRIM 

BRA IRIMF.TZ 

LDPP RIMADRO,IMPI 

BRA C0M4X 



WRITE DATA TO THE DEVICE 



OUTPUT THAT DATA 10 IHE RIM 



DO CONTROL STROBE 4 



OUTPUT* 
. 65 
0.65 



( \xy* x=2,3» y ODD) 
(IMP Ixy) EXr COM 



IRIMF 



(IMP 133) 
( 133) 

( 135) 
(IMP 135) 

TSTI P 

BRA 
BRAX 



EXr COM2 
EX COM2 

EX COM3 
EXr COM3 

,SWUSER,PSWI 

IVIOL$,FZ 
FETCHN 



OUTPUT THAT ADDRESS TO THE RIM 



EX COM OUTPUT TO 5500 BUS 
OUTBUS <- (R) 

** NO-OP ** 

DO CONTROL STROBE 2 

DO CONTROL STROBE 3 
*• NO-OP •* 



ONLY CONTINUE IF PR IV ED 
ELSE IT IS A NO-OP 



DATAPOINT CONFIDENTIAL INFORMATION - SEE PAGE 1 
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3 PH0C14G3/LIB 


MICPO-PHOCESSOrt EMULATION SUPPORT 












. INPUT 


OUTPUT OPERATIONS 


( 


659. 








+ 








660. 


00 1 1 22L 






EXCOMl t 








661. 








• 


( 131 ) 


EX COMl 


( 


662. 








• 


(IMP 131) 


EXr COMl 




663. 








. 1.60.. 


.2.95 (RIM)» 0.95 (NON-RIM) 




664. 














( 


665. 


00 1122L 
00II23L 


00 1 1 000 1 
01 0001 01 


1 1 1 11 00 
00000100 




TSTIP 


,SrtUS,ER,PSrtI 




666. 


00 1I24L 


11 000010 


00100100 




BRA 


IVIOL$,FZ 


( 


667. 


00 1125L 


OlOOOlOl 


00001000 




TSTIT 


,SrtIRIM 




668. 


00I126L 


1 10000 11 


1 00 1 1 00 




BRA 


EXCOMJ »TZ 




669. 


001127L 


00 110001 


not 1 1 It 




LDTP 


IMPI 


( 


670. 


00 1130L 


000101 11 


10100010 




.SHIFT 


SL,CC 




671. 


OOIIJIL 


01010101 


0000 1 no 




DOT I 


,ND,07<1 


(■ 


672. 


00 1132L 
00 I 1 33L 


01010010 
01 10.11 11 


10010100 
till 0000 




DORA 


LINK»AC, EXCOMJ 




, 673. 


00n34L 


11101111 


00000000 




BRR 


LINK 




674. 








• 








675. 


00 1135L 


00 1101 11 


oiotooot 




. STB 


EXCOMl 7 




6/6. 


00 1 1 36L 


11 00 1 MO 


1 1 1 1 1 1 1 1 




NOOP 






677. 


>001137L 
>00 1140L 


010 11 001 
11001111 


1 1 It 1 1 11 
11111111 




BRAX 


FETCHN 




. 678. 


00114IL 
00 1142L 


01010001 

noon 11 


10001001 
10010010 




BRC 


XBUFP »,XC 15 




679. 


001143L 
00 1 1 44L 


01010001 
1 1 00 1 1 1 1 


1000 1 too 

10010010 




BRC 


XBUFP,, XC 14 




680. 


00I145L 
00 1146L 


01010001 
11001 1 11 


I 001 01 00 

too too to 




BRC 


XBUFP,, EXCOMJ 




681 . 


001147L 


00 1 1 1 1 1 


oiototoi 




STB 


EXCOMl 2 




682. 


00 1 1 50L 


1 1 00 1 1 1 1 


10010100 




BRA 


EXCOMJ 


( 


683. 


00I15JL 


00 1 1 1 1 1 


01010100 




. STB 


EX COM 1 1 




634. 


00 1152L 


11001 no 


1 1 1 It 1 11 




NOOP 






685. 


00 1 1 53L 






FTCHIAB 








686. 


>00I153L 
>00 1154L 


010 11001 

11001 in 


1 1 1 1 1 1 11 

t 1 1 M 1 11 


EXCOMJ 


BRAX 


FETCHN 




687. 














\ 


688. 


00 1 I 55L 


01101111 


1 1 110000 


XBUFP 


BAS 


LINK 




689. 


00 I 1 56L 


00 11 0001 


10001001 




LDX 


MR2PCL 


{ 


690. 


00 1 1 57L 
00 1)60L 


00 1 1 000 1 
00 1 1 II 1 


11001 1 n 

00 1 I t 1 




LDX 


IM2,MRL,LDRIMBP 




691. 


001161L 


00 1 10001 


11 00 loot 




LDX 


PC2MRL 




692. 


00 1162L 


11101111 


00000000 




BRR 


LINK 


( 


693. 
















694. 


001I63L 


001101 11 


01010110 


XCI4 


STB 


EXCOMl 4 


/ 


695. 


>00n64L 


01 1 1001 


11 1 1 1 1 11 




BRAX 


FETCHN 


( 


696. 


>00 1165L 


1 1 00 1 1 1 1 


11111111 










697. 


00 1 1 66L 


00 1101 It 


010101 n 


XCt5 


- STB 


EXCOMl 5 


( 


698 . 


>00]I67L 
>00I170L 


010.1 1001 
1 1 00 It 11 


11111111 
11111111 




BRAX 


FETCHN 



79DEC.12 16:20 



DO CONTROL STROBE 1 



ONLY CONTINUE IF PRiVED 

GET DATA TO BE STROBED TO THE RIM 

SELECT LOWER 3 BITS (SHIFTED UP ONE) 
ADDRESS INTO FUNCTION TABLE 

AND GO DO IT! 

7 ( 1 .85) RESET CONFIG 

6 (1.60) NO POR ANY MORE 

5 (2.95J SET BUFFER PNTR i-OR RCVR 

4 (2.95) SET BUFFER PNTR FOR XMTR 

3 (2.80) SET BUFFER PNTR FOR PROCESSOR 

2 (1.95) DISABLE RECEIVER 

1 (1.85) DISABLE TRANSMirrER 

. (FOR ALPHA/BETA/STL DOING A NO-OP) 
(1.60) NO IPE (TO BE CLEARED) ANY MORE 



DON' T LOSE UPDATED PC 

LOAD BUFFER POINTER TO THE RIM 

RESTORE PC 

NOW DO OPERATION (IF NEEDED) 

BUFFER SELECTED, START TRANSMITTER 



BUFFER SELECTED, START RECEIVER 



( 



DATAPOINT CONflDhNTlAL INFOHMATION - SEH PAGE 1 
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699. 
700. 
70J. 
702. 
703. 
704. 
705. 

706. 

707. 
708 . 
709. 
710. 
711. 
712. 
713. 

714. 
715. 
716. 



717. 

718. 
719. 
720, 
721. 
722. 
723. 
724. 

725. 
726. 
727. 



728. 

729. 
730. 
731. 
732. 



PrtOC14G3/LIB 



00 11 7 1 L 



00 1 1 71 L 
00 1172L 
00 1 I 73L 
00 1 1 74L 
00 1 1 75L 
00 1 1 76L 
00 1 1 77L 
001200L 
001201L 
001202L 
001202L 
001203L 
001204L 
001205L 
001206L 
00120 7L 
00121 OL 
00 1 2 1 1 L 
001212L 
00I213L 
00 1 21 4L 
001215L 
001216L 

001217L 
00 1 2 1 7L 
001220L 
00 1 22 1 L 
001222L 
001223L 
00 1 224L 
001225L 
001226L 
001227L 
00 1 230L 
00 1 23 IL 
00 1 232L 
001233L 



00 110001 
00 1 1 OOjO 1 
00 1 10001 
01 000101 
11000010 
01000101 

110000 11 
OIOOOIOJ 
11000011 

00 110001 
00 1101 11 
00110001 

00010 1 11 

00 11 000 1 
01010100 
00 1 1 1 1 1 
11 0001 00 
110101 II 
00 1 101 11 
01000101 

11 00001.0 
1 1 0. 1 1 1 1 1 



00 1 10001 
00 1101 11 
00 I 1000 I 
000101 11 
00 1 10001 
01010100 
00 1101 11 
11000100 
llOIOI 11 
00 1101 11 
01000101 
11000010 

not 1 1 11 



11100101 
11000 110 
1101 1100 
00000100 
00100100 
00001000 
I 1 1 11010 
00010000 
1 110000 

OIOJOOIO 
00101001 
00 11 0000 
10 110010 
11010010 
00000001 
01 lOOOIG 
01110110 
00010001 
0000 1 1 00 
0000 1 I 11 

N 1 1 101 

00001 1 II 



010100 11 
00101001 
00 1 I 0000 
10110010 
11010010 
00000001 
01 100010 
01101001 
00010001 
00001 100 
0000 I I 1 1 
111 0000 
0000 1 1 1 1 



MICRO-PROCESSOR EMULATION SUPPORT CODE 
. INPUT OUTPUT OPERATIONS 



HJS - 



79DECI2 16*20 



MIN» 
! 1.70 



MI NOT 



MINST 



(Ml 061 ) MIN 



MULTIPLE INPUT 



■^ C * 1.60 (+0.10 IF STATUS) (HL) <- INBUS; HL <- HL + 1 

C <- C - II RPT UNTIL C=0 (16) 



DLRX 

TSTIP 

BRA 

TSTIT 

BRA 

TSTIT 

BRA 

LDPP 

LDTP 
CCLR 
DOPIP 

MrtAIT 



LOPP 

LDTP 

CCLR 

.DOPIP 



MWAIT 



HL2MR 

,SWUSER,PSWI 

IVIOLS.FZ 
»SrtIRIM 
PFMIN,TZ 
,SrtSTDT 
MINST, TZ 

MDW.RIMDATI 

SRVREQ 



PRELOAD MAR WITH WHERE TO SAVE DATA 



ONLY CONTINUE IF PRIVED 

IF NOT RIM THEN PARITY FAULT 

IF STATUS MODE THEN DO STATUS MIN?? 

** LOOP IS 1.60 MICRO-SECONDS!!! 
GET RIM DATA, d WRITE TO MEMORY 

*• DELAY 150 NS ** 



URFO+URC,SB,l .URI+URC DECREMENT COUNT IN C 



»MEMPF 



WAIT i-OR MEMORY OP 



STB 


I MAR 




TSTIT 


,017 


AT THE END? 


BRA 


MINDT,FZ 




BRA 


MIOEND 


YES 



MDW,RIM3TAI GET RIM STATUS & WRITE TO MEMORY 
SRVREQ ** DELAY 150 NS ** 

URF0+URC,SB,1,UHI+URC DECREMENT COUNT IN C 



,MEMPF1 



WAIT FOR MEMOR.Y OP 



STB 


I MAR 




TSTIT 


,017 


AT THE END? 


BRA 


MINST,FZ 




BRA 


MIOEND 


YES 



( 
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733. 
734. 
735. 
736. 
737. 
738. 
739. 

740. 

741 . 
742. 
743. 
744. 
74t>. 
746. 

747. 
748. 
749. 
750. 



PH0C14G3/LIB 



MICRO-PROCESSOR EMULATION SUPPORT CODE - HJS - 
. INPUT OUTPUT OPERATIONS 



/9DEC12 16»20 



751 . 

752. 
753. 



754. 
7 55, 

756. 
757. 
758. 

759. 
760. 



761 . 

762. 
763. 
764. 
765. 
766. 
766. 
766. 
767. 



00 1 234L 



001234L 
001235L 
00 I 236 L 
001237L 
001240L 
001241L 
001242L 
001243L 



001 
001 
001 
001 
001 
001 
001 
001 
001 
001 
001 
>001 
>001 
001 
001 
001 
>001 



2 44L 
245L 
246L 
247L 
250L 
25.1 L 
252L 
253L 
254L 
255L 
256L 
257L 
260L 
261 L 
262L 
263L 
264L 



00J265L 
00 1 265L 
001266L 
00 1 267L 
001270L 
001 271 L 
,0012 72L 
001273L 
001274L 
001275L 
001276L 
001277L 
00 1 300L 

001301L 
001302L 
001303L 
001304L 
001305L 



00 110001 
00 1 1 00.0 1 
00 11 000 1 
01 000101 
11 0000 10 
00 11011 1 
01000101 

n 0000 10 

00 11 000 I 
01010101 
11 000010 
01010001 



01 

00 

Oi 

00 

00 

01 



0.1 1 1 1 
10001 
1 1 1 00 
101 II 
10001 
101 00 
00 I 10 I 11 
01011001 
II 000000 
00 110001 
01010100 
00 I 101 II 
1 1 00 t I I 1 



00 I 101 II 
00 1 10001 
00 1 1 1 1 1 

00010 I 11 
00 110001 
01010100 
00 1101 I 1 
1.1 000100 
110101 II 

00 1 101 II 

01 000101 
1 1 0000 1 

11001110 
1 I 00 I I I 

1 1 00 I I 1 
00 I I 0001 
00 1 1 I I 1 



I 1000 I 10 
I IIOOlOl 
1 I t 1 1 00 
00000100 
00100100 
01000 1 II 
00001000 
010001 II 

11010010 
00001 I II 
010101 II 
00010000 
I I IIOOOl 
11010010 
00 1 1 000 I 
01100010 
I 1 1 1 1 
00 110001 
100001 10 

1 1 11 1 1 II 
1 1 1 1 1 1 II 

IIOIOIOI 
00000000 
lOOOOIOl 



01000 1 11 

00 1 10 1 10 
00101000 
10 II 0010 
IIOIOOIO 
00000001 
01100010 
010000 11 

000 1 000 I 
0000 1 100 
0000 1 1 11 
01001010 

1 1 1 1 1 1 II 
1.1 111 1 11 
1 1 111 I II 

00 no 1 10 

00101000 



+ 
MOUT« 

(111 071 ) MOUT 
. .1 .45 + C * 1.60; OR 
. 2.65 (IF NON-RIM) 



MOUTN 1 6 



MOUrLP 



MOUTOUT 



DLDX 

TSTIP 

BRA 
STB 
TSTIT 
BRA 

DOT IP 

BRA 
LDTI 
LDRT 
DOPRP 



BRA 



STB 
LDPP 

CCLR 
DOPIP 



MrtAIT 



HL2MR 

,SWUSER,PS»VI 

IVIOL$,FZ 
SMR 

.SWIRIM 
MOUrOUT,FZ 

,ND,0r7,URI + URC 



MULTIPLE OUTPUT 

OUTBUS <- (HL)I HL <- HL + 1 

C <- C - II RPT UNTIL C=0 (16) 

GET DATA AS SOON AS POSSIBLE 

ONLY CONTINUE IF PRIVED 



DO MOUT OR DO NOTHING 
UPDATE HL 6. C FOR MOUT 



M0UrN16,FZ 

16 

TEMP 1 

URFO+URC, SB, TEMPI ,URI+URC,CO 



TO NON-EX ISTANT DEVICE 
IF C IS ZERO, USE 16 



COUNT DOWN C 



DOPRP URO+URL,SB,TEMP1,URI+URL,CO COUNT DOWN HL 

BRAX FErCHW,FC (NO CARRY TO H) 
DOPIP URO+URH,SB,0,URI+URH COUNT DOWN HL 



FETCHW 



SMR 
RIMDATO,MDR 



(FETCHrt FOR THE WASTED SMR!) 

•• LOOP IS 1.60 MICRO-SECONDS!!! 

GET DATA OUT TO THE RIM 



URFO+URC,Sa,l ,URH-iJRC DECREMENT THE COUNT IN C 



, MEMPF ; 



BASE 16 END? 

COMPLETED BASE .16 IF JUMP 

** DELAY 300 NS (FOR 1.60 TOTAL) ** 
AND KEEP CODE THE SAME SIZE 
AND KEEP CODE THE SAME SIZE 
AND KEEP CODE THE SAME SIZE 

GET FINAL DATA OUT TO THE RIM 



STB 


I MAR 


TSTIT 


,01 / 


BRA 


MOUrLP,FZ 


RPT 


3 


NOOP 




NOOP 




NOOP 




LDPP 


RIMDATO.MDR 



( 
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( 



PAGH 34 



771. 
7/2. 
773. 
774. 
775. 
776. 
777. 
778. 
779. 
780. 
781. 
782. 
783. 
784. 
785. 
786. 
787. 
788. 
789. 
790. 
791 . 
792. 
793. 
794. 
795. 
796. 
797. 
798. 
799. 
800. 

801 . 
802. 
803. 
804. 
805 . 
806. 
807. 
808. 
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809. 



00I307L 

001307L 
001310L 
00131 IL 

001312L 



001312L 
00I313L 

001314L 



101111 
010001 
0011 11 



I I 110010 
I 1 1 1 0000 
00101100 



0101000 
11001 1 1 



00 1 
00 1 



0000 
0010 



001314L 01010001 00101010 



00 1 3 1 5L 



001315L 
001316L 
001317L 
001320L 

00 1 32 1 L 

00 1 32 IL 
001322L 
001323L 
001324L 
001325L 
001326L 
00 1 327L 



1 I 1 I 1 J 
01010001 
1 I I 1 1 1 
11001 1 II 



110 1 I 11 
01010001 
0110.1 1 11 
00 1 10001 
00 1 10001 
00 1 1 1 1 1 
11001 1 N 



11 1 100 10 

1 not 1 11 

1 1 110001 
000 I 1 000 



1 110010 
1101111 

1 11000 i 

1001001 

1101000 

00001 100 

000 11000 
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MICkO-PHOCESSOH EMULATION SUPPORT CODE - HJS - 
. SYSTEM CALLS AND OP-CODES FOR IT 



79DEC12 16120 



NOTE* FOR ALL SYSTEM CALLS, THE WAY THE PC SHOULD BE LEFT IS SPECIFIEd 



/. 



p / V" /7 / >f ^ l^j Sri^ 



SCROMLI* 
.8.70 



* 

BPs 



8.35 



SC« 



8. 15 



* 

SCBP 
. 8.05 



* 

SCRAMI* 
. 8.50 



SCROMX 



LDRT 
LDTI 
BRA 



TEMPL 

SYSR0M>8 
SCROMX 



052 ) BP 



LDTI 
BRA 



SVBKPNT 
SCBP 



067) SC 



LDTI SVSCAL 
BRA SCBP 



LDRT TEMPL 

LDRI TEMPH, SYS I yR>8 

BRA SCPC 



LDRT TEMPL 

LDTI SYSIVR>8 

LDRT TEMPH 

DLDX PC2MR,,IMAR 



BRA SCPC 



!1 UP THE PC TO NEXT INSTRUCTION i 
!! MEMORY OH SECTOR TABLE PARITY ^RROR ,..-^--' 
ROM VECTOR SAVED . ' """ 

HOPEFULLY POINTING AT THE NEXT:^^#STRUCTI0N 



!i PC LEFT AFTER THE INSTRUCTION 

BREAKPOINT 

(SP-2 I SP-1 ) <- PC 

SP <- SP - 21 PC <- BRKPNT 

DEBUGGING BREAKPOINT RAM VETCOR 



!i PC LEFT AFTER THE INSTRUCTION 
SYSTEM CALL (SUPERVISOR CALL) 
(SP-2 I SP-1 ) <- PC 
SP <- SP - 2; PC <- SYSCAL 

SUPERVISOR CALL RAM VECTOR 



M UP THE PC TO NEXT INSTRUCTION 
!1 RAM VECTOR FOR INTERRUPT 

RAM VECTOR SAVED 



!J PC. LEFT AFTER THE INSTRUCTION 
!! MEMORY ACCESS & WRITE VIOLATIONS 



GO TO THE RAM VECTOR 
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. SYSTEM CALLS AND OP-CDDES FOR IT 



79DEC12 16*20 



810. 
8 11. 
812. 
813. 
814. 
81b. 
816. 
817. 

818. 
819. 
820. 
821. 
822. 
823. 
824. 
825. 
826. 
827. 
828. 
829. 
830. 
83 1 . 
832. 
8 33. 
834. 

835. 
836. 

837. 
838. 
839. 
840. 



84.1. 

842. 
843. 
844. 
845. 
846. 
847. 

848. 
849. 
850. 
851. 

852. 



001330L 



001330L 00 llOOiDl 

00I331L 01000101 

00 I 332L 1 1 0000 1 1 

001333L 01 01 0001 

00 1 334L 1 1 00 1 I 1 1 



11 1 I 1 00 
00000100 
00 1000 10 

0001 1 no 

00100001 



00 1 335L 

001335L 01 01 0001 00110110 
001336L 



00 1 336L 
001 33 7L 



11000100 
1 1 000 1 I 1 



001340L 01101 I 11 
001341L 01010001 
001342L 01 1011 11 



00100001 

000 1 1 1 1 1 

1 1 110010 
1 1 1 1 I I 1 
1 1 110001 



001343L 11001001 00010110 



001344L 
00 1 345L 
00 J 346L 
001347L 
00I350L 



00135IL 



001351L 
001352L 
00 1 353L 
001354L 
001355L 
001356L 
001357L 
001360L 
001361L 



00 
00 
00 
00 
00 



lOOOl 
10001 
101 11 
lOOOl 
lOODI 



I I 00 I 001 
11 101 000 
0000 NO 1 
10001001 
10101000 



OlOlOOOl 
00 1101 11 
OOIIOI 11 
OiOIOOOl 
00 110101 
00 110001 
00 110 1 11 
00 110001 
010101,01 



I 1 1 1 0000 
1 1100000 
00000101 
1.1000000 
1 10010 11 

1 noioio 

00001 101 
1101 1100 
110 11010 



UDPOP I 

( 000) HALT 

( 00 1 ) HALT 

( 377) HALT 

. 8.50 (+0.10 IF NOT USER MODE) 



IVIOL$« 

• 

UDOP« 
. 8.05 
. 8.05 



*• 

SCLSTrt 
. 7.95 



TSTIP 

BRA 

LOT I 
BRA 



,SrtUSER.PSrtI 

UDOP.TZ 

SVIVIOL 
SCLSTW 



171 ) 
1 75) 



LDTI 



SVUAINS 



SCLST» 



MWAIT 

LDRT 
LDRI 



,$+1 

TEMPL 
TEMPH»SYSIVR>8 



1,6b .(+ 0.65 IF IMP # 0) 

BRA SCDON,T@,IZ 



SCPC 

. 7.55 

SCDON* 
. 7.25 



DLDX 



DLDX 



PC2MR,,DMAR 



MR2PC 



!J PC LEFT AT NEXT INSTRUCTION 

Ui^DEflNED PRIVILEDGED OP 

( SP- J I SP- 1 ) <- PC 

SP <- SP - 2» PC <- I VIOL 



UNDEFINED IF IN PR IV MODE 

!! PC. LEFT AT LAST INSTRUCTION 

TRIES PRIV-^D INSTRUCTION WHILE USER MOD 

•i PC. LEFT AT LAST INSTRUCTION 

(SP-2 I SP-1 ) <- PC 

SP <- SP - 2; PC <- UAINST 

UNDEFINED OP-CODE VECTOR SYSCALL 

•! RAM VECTOR INTERRUPT 

M 5500 I/O BUS PARITY ERROR 

!J BACKUP PC TO START OF 

•! INTERRUPTING INSTRUCTION 



SAVE RAM VECTOR ADDRESS 



POINTS TO START OF LAST INSTRUCTION. 
•J 1 MSEC INTERRUPT rtHEN REPEATED 
BACK UP TO IMP SPEC CODE 



!1 SYSTEM CALL PERFORM SECTION 
SAVE -P.C. AS SHOULD BE 



LDP I 




•! 1 MSEC INTERRUPT rtHEN NOT REPEATED 
MAR0H,SYSR0M>8. AND. 0360 CORRECT ENTRY 017 TO BE SURE 

IN THE SECTOR TABLE 
POINT TO THE PSrt SAVE BYTE 



STW 

0300 

SP2MRL,ND 

SP2MRH,DMAR 



M0DW,ND,-1-SWSCF,PSWI CLEAR NECESSARY SYSCALL FLAGS 



S'c D^ Y/< 



i^ 



r- A 



ims^-n 
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8t)3. 
854. 

85b. 
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856. 
857. 



858, 
859, 
860, 
861 , 
862, 
863. 
864. 

865. 
866. 



001 

001 

001 

001 

001 

001 

001 

001 

>001 

>001 

>001 



362L 
363L 
364L 
365L 
366L 
367L 
370L 
371 L 
372L 
3/3L 
374L 



00 1 101 1 1 
00 110001 
OOIIOI 11 
01010101 
00 1101 11 
OlOlOOOl 
00 1101 11 
1.1000100 
OIOJIOOI 
0101 000 1 
11000 1 10 



00000100 
1 1 1 1 I 00 
00101001 
IIOIIOIO 
1000 1100 
00001001 
00000001 
00000 110 

1 1 11 1 1 11 

M 11 1 1 11 

1 1 11 t 111 



001375L 01010001 
001376L 010 110.01 
001377L noon 11 



00000 I 10 

11111111 

11011011 



MICRO- PROCESS OR EMULATION. SUPPORT CODE - HJS - 
. SYSTEM CALLS AND OP-CODES FOR IT ^ r^^-r-i . 



79DEC12 16:20 



fro^^K 



LDPP 

DOPI 

LDPI 

MWAIT 
BRCX 



MDW,PSrtI SAVE ORIGINAL PSW IN ITS SAVE AREA 

PSW0,ND»-1-SWSCF SET NEW SYSCALL FLAGS 

LIMP«PCL GET SET FOR PUSH OF THE P.C. 

, IGNORE WAIT ON WRITE & IF ERROR, TROUBLE 

PSHSrO,F.@,MP,tiGMt3D IF NO ERROR, GO TO IT (SAVED 1 WORD) 

s r- 



^- .; / /</^ 



. MEMPFSC 

. WOW! SYSTEM SAVE AREA HAD SECTOR TABLE OR WRITE PROTECT FAULT 
USE THE ROM VECTOR POINT TO MARK A DOUBLE BAD INTERRUPT 



LDTI 
BRAX 



SRSYSMF 
FETPC 



DO SPECIAL INTERRUPT 

FORGET PUSH, WILL PROBABLY NOT WORK 



TABPAGE PROCL 



CC STl^ 



^ c '^ fc n 



^- c^ j: 







/i it J).- i/s /^ ■ ^'^^'i^^ 1^/ rx 






/-<'-■ /-/^.^ 
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869. 








• 






870. 


001400L 






BETA* 






871 . 










( 020) 


BETA 


8/2. 








. 2/. 90 


(1.35 IN BETA) 


8 73. 














874. 














875. 














876. 










(111 020) 


BETAL 


8 77. 








! 13.45 






8 78. 














8 79. 










(062 020) 


SYSSAV 


880. 








. 14.00 






881 . 














882. 








. NOTE* 


CAN NOT IMS. INTERRUPT BETrt 


883. 














884. 


001400L 
001401L 


00 110001 
0100010.1 


1 1 1 1 1 00 
00000 I 00 




TSTIP 


,SWUSER,PSrtI 


885. 


001402L 


11000010 


00 100 I 00 




BRA 


IVIOL$,FZ 


886. 


001403L 


01 000 I 01 


00100000 




TSTIT 


,SrtRPT 


88 7. 


001404L 


11010010 


1.1000 110 




BRA 


BETAL, FZ 


888. 


001405L 


iioiioii 


11000 110 




BRA 


BETAL /re, 10 


889. 


00I406L 


01000101 


10000000 




TSTIT 


,SWALBT 


890. 


001407L 


no It 000 


1 1 110010 




BRA 


SYSSAV,F§,IZ 


891 . 


001410L 


11 000010 


10010100 




BRA 


FTCHIAB,FZ 


892. 


00141 IL 
001412L 


010100 i 1 
00 110 1 11 


00100000 
1000 MOO 




DO^I 


PSrtO,OR,SWRPT 


893. 


001413L 


OIOlOOOl 


0011 1 no 


ALPHAS 


LDTI 


SESAVAF.AND.Ol 77 


894. 


0014 14L 


not n 11 


1 1100100 




BRA 


MODS A V 


895. 








* 






896. 


00141 5L 






SYSSAV 






897. 








• 


(062 020) 


SYSSAV 


898. 








,. 14.00 






8 99. 














900. 


0014I5L 


1 1 1 00 1 1 


1 1 1 1 1 00 




BRA 


ALPHAS » TZ 


901. 


0014I6L 


1 1 1 1 1 1 1 


1 1 1001 01 




BRA 


BETAS 



SAVE ALPHA REGS AND LOAD BETA SET 

■'FXLHEDCBA-' <- FXLHEDCBA 
FXLHEDCBA <- "FXLHEDCBA-'' 

LOAD REGS FROM BETA SAVE AREA 
FXLHEDCBA <- "FXLHEDCBA" 

SAVE SYSTEM REGS 
'"FXLHEDCBA-"' <- FXLHEDCBA 



ONLY IF PRIV'D 



IF REPEATED DO SECOND HALF 

IF ODD, ONLY LOAD BETA REGS 

TEST HERE, SYSSAV NEEDS IT 

SYSTEM SAVE IF NON-ZERO 

SIMPLE BETA, FORGET IT, ALREADY IN BETA 

TrtO PARTS, SO REPEATED 

POINT TO CORRECT SAVE AREA (/ BITS!) 



SYSTEM SAVE WHICHEVER REGISTERS & FLAGS 
"'FXLHEDCBA^' <- FXLHEDCBA 

SAVE ALL REGISTERS TO THE ALPHA SET 
NO, TO BETA SET 
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902. 
903. 
904. 
905. 
906. 
907. 
908. 
909. 
910. 
911 . 
912. 
913. 
914. 
915. 
916. 
917. 
918. 

919. 
920. 
921 . 
922. 
923. 
924. 

926. 

92/. 
928. 
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001417L 



001417L 
001420L 
00 1 42 1 L 
001422L 
001423L 
00 1 424L 
001425L 
001426L 
001427L 
001430L 
001431L 
00.1 432L 



00 1 10001 
01 000101 
11 000010 
01 000101 
II 01 0010 
1101 10 I 1 

lion 000 

01 000101 

1 1 0000 1 I 
01010011 
00 1 101 11 
01010001 



1 101 1 100 
00000100 
00100100 
001 00000 
I 00 1 I 1 00 
1 00 I I 1 00 
10 111000 
10000000 
10010100 
00100000 
I 000 1 1 00 
00110101 



MICRO-PROCESSOR EMULATION- SUPPORT CODE - HJS - 
. REGL, ALPHA, BETA MODE. SWAPS AND SUB-PARTS 
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+ 
alpha: 

( 030) ALPHA 

2 7.50 -( 1 .35 IE ALPHA) 



(Ml 030) ALPHAL 



13.15 



(062 030) SYSRET 
21 .00 (+ 0.40 IF BETAL) 



SAVE BETA REGS AND LOAD ALPHA SET 

■"FXLHEDCBA-*' <- FXLHEDCBA 
FXLHEDCBA <- 'FXLHEDCBA^ 

LOAD REGS FROM ALPHA SAVE AREA 
FXLHEDCBA ■<- 'FXLHEDCBA' 

RESTORE REGS AND RETURN 

PC <- (SP+1 I SP); SP <- SP + 2 

FXLHEDCBA <- "-'FXLHEDCBA^-' 



. NOTE* CAN NOT IMS. INTERRUPT BETWEEN ALPHA d FOLLOWING INSTRUCTION. 



TSTIP 



,SWUSER,PSWI 



BETAS 



ONLY IF PRIVED 



IF REPEATED JUST DO SECOND HALF 
NO SAVE, JUST DO ALPHA LOAD 
RELOAD REGS & RETURN 
IS A SIMPLE ALPHA INSTRUCTION 
FORGET IT, ALREADY IN ALPHA MODE 
MARK REPEATED BECAUSE 2 PARTSJ 



SESAVBF.AND.0177 (7 BITS) TO POINT TO TOE SAVE AREA 



BRA 


IVIOL$,FZ 


TSTIT 


,SrtRPT 


BRA 


ALPHAL, FZ 


BRA 


ALPHAL, r@, ID 


BRA 


SYSRET, F@, I Z 


TSTIT 


,SWALBT 


BRA 


FTCHIAB,TZ 


DOPI . 


PSWO,OR,SWRPT 


LDTI 


SESAVBF.AND.O 


BRA 


MODS A V 
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929. 
930. 
931 . 
932. 
933. 
934. 
93b. 

936. 

937. 



938. 

939. 
940. 

941 . 

942. 

943. 
944. 
94t). 

946. 
947. 

948. 
949. 
950. 
951. 

952. 

953. 
954. 
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. R£GL« ALPHA, BETA MODE SWAPS AND SUB-PARTS 
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Q01433L 



001433L 
001434L 
00I435L 
U01436L 
001437L 
001440L 
00 I 441 L 
001442L 
001443L 
00 1 444L 
00.1 445L 

00 I 446L 
001 447 L 
001450L 
001451L 
001452L 
001453L 
001454L 

00J455L 
00I456L 
00 1 457L 
001460L 
00146JL 

001462L 
00I463L 
001464L 
001465L 
00I466L 
001467L 
U01470L 



+ 

MODS A V SAVE FLAGS AND REGS IN SAVE AREA 

, . 12.75 (FETCH); 26.20 (ALPHAD; 26.40 (BETAL) 



01 101 111 11 MOO 10 

00110001 11101010 

00 110001 110 110 11 h^0sf^iiU 

01010101 10000000 ^ ^ 

01 1100 11 1 1 110010 

001101 11 1 1000000 

00 110001 00110101 
OlOJOlOl 11000011 

001 tot 11 00 101 001 

01 01 0001 000 t 0000 REGSVLP 

00 1101 11 00000001 



itoiotoo 

ItOlOt It 
00 110 1 11 
00 1 tot 11 
00 1 1 000 1 
00 1 1 1 I 1 
1101 1000 

00 1 10001 
OlOOOlOt 

1 1 1 00 1 1 
OlOlOtOI 
00 1101 II 

00 I I 000 I 
11010010 
00 I 1000 1 
01 000101 
11010100 
11010 I II 
11010010 



1 101 I 001 
00010001 
00001 101 
00001001 

not 1 1 11 

00101001 
110 11001 

not 1100 

00100000 
lot 11010 

11111 no 

00000100 

0011 0000 
101 1 1100 
It I I I 00 
1 0000000 

I too toot 

0001 0001 
100 Ml 00 



MODSVLP 



LDRT 
LDX 
DOT IP 

DOPH 

DOPIP 

LDPI 

MWAIT 

STB 

LDPP 

BRA 

TSTIP 

BRA 
DOPI 



TSTPT 
BRA 
TSTI P 

MWAIT 

BRA 
BRA 



TEMP2 

SP2MRH 

♦ND,0200»SPIL 



SAVE AW Ay FOR THE MOMENT 

MSB STACK POINTER IS SAVE AREA ALSQ^ 

GET 128 BYTE BOUNDARY BIT (1 MSBIT) 



^m /loP sn/€ ^^^ r< 



MAR0L,0R,fEMP2 COMBINE WITH THE FLAG ADDRESS 

MDW,ND,0303,UCFLG SAVE THE FLAGS, ONLY 4 BITS OF INTEREST 



LIMP, IMPS 

, MEMPF 1 
DMAR,DIMP 
MDW,IMPI 
MQDSVLP,F@,IZ 
,SWRPT,PSWI 
i-TCHABW,TZ 



I NIT COUNT 



SAVE THE REGISTER 

LOOP TILL ALL 8 REGS. ARE SAVED 

WELL, ONE OR TWO PARTS V 

ONLY SYSSAV, NO-LOAD NEW REGS. 



M0DW,ND,-1-SWINTE TEMPORARILY DISABLE INTERRUPTS FOR IT 



FI,SRVREQ 
MODSRV,FZ 
,SWALBT,PSWI 

, MEMPF 1 

ALPHAL,FZ 
BETAL 



ANY REQUESTS PENDING? 

YES, DO THEM AND I HOPE NO TROUBLE 

WHAT WAS IT? 

NEEDED AFTER MDW AT END OF LOOP ABOVE 

WAS BETA, DO ALPHAL NOW 
WAS ALPHA DO BETAL NOW 



PAGE 40 



95b. 
956. 
957. 
958. 
959. 
960. 
961. 

962. 

963. 
964. 

965. 
966. 
967. 
968. 

969. 
970. 

971. 
972. 
973. 
974. 
975. 
976. 
9 77. 
978. 
979. 
980. 
981 . 
982. 
983. 
984. 
985. 
986. 
98 7. 
988. 
989. 
990. 
991 . 

992. 



HriOC 1 4G3/LI 8 



001 471 L 



001471L 
0014/2L 
001473L 
001474L 
001475L 
001476L 
0014 77L 
001500L 
001501L 
0Q1502L 



00 110001 
00 1 10001 
01010101 
01010011 
00110111 
00 1101 11 
00 1 1 000 1 
0101001 1 
01010101 
11011111 



>001503L OIOIIOOI 

>001504L 11001111 

>001505L 010 11001 

>ooi506L noon II 

001507L 



I I 101010 

noiioii 

10000000 

00 110101 
11000000 
010001 II 

no 1 1 100 

10000000 

lion 1 11 

1 001 01 00 

II II 1 1 II 
11 1 II 1 1 1 

1 1 1 1 1 111 
1 1 n 1 1 n 



993. 
994. 
995. 
996. 



00I507L 

001510L 

>00I5 11L 

>001512L 

>00I513L 

00 1 5 14L 

0015I4L 
0015I5L 
00 1 5 1 6L 



01010001 
00 1101 11 

010 11001 
OIOIOOOI 

1 1 00 1 I II 



00 I 1 000 1 

00 110001 

001 101 11 



00001001 
00000001 

1 1 II 1 1 11 
1 111 1 1 n 
1 1 1 1 1 1 II 



11 00 1 00 I 
I 1101000 
00001101 



DATAPOINT CONFIDENTIAL INFORMATION - SEE PAGE 1 

MICHO-PROCESSOk EMULATION SUPPORT CODE - HJS - 
. REGL, ALPHA. BETA MODE SrtAPS AND SUB-PARTS 



/9DEC12 16«20 



+ 

BETAL 

(111 020) BETAL 
. 12.70 (HERE ON) 



LOAD REGS FROM BETA SAVE 
FXLHEDCBA <t- ^FXLHEDCBA^ 



LDX 
DOT I P 

. DOPI 

^ DOTIP 

DOT I 
BRA 



SP2MRH 
,ND,0200,SPIL 

MAROL,OR.SESAVBF.AND.0177 POINT TO BETA FL^OS IN SAVE AREA 

SMR 

,OR,SWALBT,PSrtI SET BETA MODE 







LPff( ^^'^^^S7A/>/^ 



MODSRV 



BRAX 



FTCHABW BRAX 



,ND,-l-SrtRPT 
MODLOD 

SRVDO 



FETCH W 



RESET REPEAT FLAG (IF SET) 

GO TO SERVICE AS NEEDED (MODSAV USES IT) 

DO FETCH rtATT AT THE END 



• 

SYS RET 

.* NOTE* THIS INSTRUCTION IS VERY LONG IN EXECUTION 

.• IF DMA SLOWS IT EVEN FARTHER WE MAY HAVE PROBLEMS 



.* WARNING* 

.* THEN* 

.* 

.* 

.* 

.* 

.* WARNING: 

.* 

.* 



IF AS SOLUTION TO LENGTH IT IS DONE AS REPEATED INSTRUCTON 

IF INTERUPTED (I.E. BY RESTART-DEBUG INTERRUPT) 

THE PC WILL REFLECT THE ADDRESS OF THE INSTRUCTION TO RETURN 

TO, WITH REPEATED FLAG ON AND THE INCORRECT REGISTER SET IN THE 

SUPPORT REGISTERS (THE ALPHAL OR BETAL NOT COMPLETED!) 

THIS IS VERY BAD! BUT POSSIBILITY IS LOW AND NO SOLUTION SEEN 

IF INSIDE SYSRET (REGISTER LOAD PART) THERE IS A MEMORY FAULT, 
THE PC WILL BE INCORRECT BECAUSE OF A SPECIAL PRE-DECREMENT. 
IF THE IMP WAS NON-ZERO, IT WILL BE EVEN FARTHER OFF 



(062 030) SYSRET 
20.15 (+ 0.40 IF BETAL) HERE ON 



SYSTEM RETURN (FROM SC, BP, ETC) 
PC <- (SP+1 I SP); SP <- SP + 2 
FXLHEDCBA <- "-^ FXLHEDCBA*'' 



LDP I LIMP,PCL GET THE RETURN ADDRESS INTO THE P.C. 

BRC)^ . POPj>TO',,SYSRET0^ QV'e PAGE WITH SPECIAL RETURN 



/ 



1(fof 



SYSRET 1 » 

. 15.55 .+ IF BETAL, HERE ON 

DLDX PC2MR,,DMAR 



ASSUME ENTERED TNST LEGALLY, XPRIVD) 
SO, COMPLETE IT LEGALLY IN PRIV-'D MODE 
CORRECT FOR LMAR IN FETCH CODE 



DATAHOINT CONFIDENTIAL INhORMAflON - SEE PAGE I 



PAGE 



PH0C14G3/LIB 



MICHO-PHQCESSOH EMULATION. SUPPORT CODE - HJS - 
. REGL. ALPHA, BETA MODE.SrtAPS AND SUB-PARTS 



79JEC12 J6»20 



997. 

998. 

999. 
I 000. 
1001 . 
1002. 



1003. 
1004. 

1005. 
1006. 

1007. 
1008. 

1009. 
1010. 
1011. 
1012. 
1013. 
1014. 

lOllD. 

1016. 
1017. 
1018. 
1019. 

1020. 

1021. 
1022. 

1023. 
1024. 
1025. 
1026. 
1027. 
1028. 
1029. 
1030. 
1031 . 

1032. 
1033. 

1034. 
1035. 



00 15 1 7L 
U01520L 
001521L 
001522L 
001523L 
001524L 
001525L 
001526L 
001527L 
001530L 
001531L 
001532L 
001533L 
00 1 534L 
001535L 
001 536 L 
001537L 
001540L 

001541L 
00 1 D42L 



001343L 



00 MOOOl 
00 110001 
00 11 000 I 
01010001 
00 110101 
00 1 1 1 I 1 

00 1 toooi 

OlOIOIOl 
00 1 1 1 1 1 
001101.11 
01010101 
011011 II 
01010001 

noiotoQ 

IIOlOl 11 
00 1 10101 

01 noon 

00 1101 11 
01000101 

not 0010 



10001 001 

10101000 "^ — 

1 1101010 

1 1000000 

11 001 on 

00001101 

not 1100 
1 1 inon 

00000 I 00 

01000 111 f/j/^^'tK 

000 1 J 000 
1 1110001 

in 00 in 

101000 11 
00010001 

001 10 no 

1 I 11000 1 
10001100 

10000000 

11 000 no 

* 

ALPHAL 



00I543L 00 1 10001 1 11 01 010 



001544L 
001D45L 
00 1 546L 
00 1 547L 
001550L 
001 551 L 



00 1 
OlOi 
0101 
00 11 
00 1 1 
00 11 



0001 
0101 

00 11 

01 11 
0111 
0001 



nonoii 

10000000 

001 1 1 no 

11000000 
01000 1 11 
110 1 1100 



00I552L 01010101 01011111 



00 1 553L 



00.1 553L 
OO 1 554L 
001555L 
001556L 
001 557 L 
001560L 
001561L 
00 1 562L 
00I563L 



00 1101 n 
OOOlOl 11 

noioioo 
noioi 11 
00 1101 n 

00 1 10001 
00 11 00 1 
00 1101 11 
110111 11 



1000 1100 
10 110010 
10010010 
00010001 
0000 1 101 

00 no 1 10 

00 110 110 

00000 no 

01100100 



DLDX 

LDX 

LDTI 

D-OP 

STB 

DOPIP 



STB 
DOR I/' 

LDTI 
MWAIT 

DOTP 
DOPR 



TSTIT 

BRA 

BRA 



MR2PC 



SP2MRH 

0300 

SP2MHL,ND 

DM AR 

MOD><,ND,-l-SrtUSER,PSWI 




^ ^1^^/v ^^^ ^ 



GET THE PS^ 
TO BE LOAJ^D 






T 



y-K/'^ 



(i^ 



SMR FROM THE SYSTEM SAVE AREA 

TEMPl,ND,S»^IRIM+SrtSTDT REMEMBER OLD RIM MODE' INFO 

-HSrtlRIM-SrtSTDT / 

.MEMPFl " 



Til,' ' v/j'/f^^':; ^2 



i OTf fSi^^^ 



(111 030) 
. 12.40 (HERE ON) 

LDX 
DOT IP 

. DOPI 

STB 
DOTIP 

BRA 

MODLOD 
. 11.35 



,ND,MDR 
PSW0»0R»TEMP1 

,SWALBT 

BETAL.FZ 

ALPHAL 



ALPHAL 



GET ALL THE-OTHER STATUS BITS 
GEXJi^»^^'rt & DO NOT SET IT OR BAD THINGS 

MAY. HAPPEN IF STACK IN PROTECTED MEMORY 
WHICH WAY TO GO? WHICH WAY TO GOV 
TO BETA! 
TO ALPHA 



LOAD REGISTERS FROM ALPHA ^AVE 
FXLHEDCBA <- 'FXLHEDCBA' / 



SP2MRH 
,ND,0200,SPIL 




i^. 



l^/A^/^i^-^ 






LdT'f fsv^m. 




GET IT ON 128 BYTE-SOUNDARY 
MAROL , OR , SESA VAF . AND .0177 ON.LY 7 JJj::S--©t^-'ThrfEHEST 

SMR 

,ND,-1-SWRPT-SWALBT,PSWI RESET REPEAT FLAG AND SET ALPHA 

MODLOD 

LOAD USERS FLAGS AND REGISTERS 



. NOTEi IF MACRO LEVEL PLAYS WITH FLAG BYTE, IT BE'TTER DO IT CORRECTLY 



LDPT 
CCLR 
MWAIT 

STB 
DOTJP 

STB 
BRA 



PSWO 

, MEMPFl 

DMAR 
,AC,Mefr,MDR 

LUF 
MODLOP 



LOAD STATUS WORD 



SET USER FLAGS 



AND DO THE REGISTER LOAD 



/ 



( \ 
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1038. 
J039. 
1040. 
1041 . 
1042. 
1043. 
1044. 
1045. 
1046. 
1047. 



1048. 

1049. 

1050. 
1051 . 
1052. 



1053. 
1054. 
1055. 
1056. 



1057. 

1058. 

1059, 
1060, 

1061 . 
1062. 

1063, 
1064, 



PtiOC\4G3/Ll3 



001564L 



001564L 
00 1 565L 
00I566L 
00.1 56 7L 
001570L 
001571L 
0015/2L 
00 1 573L 
00I574L 
001575L 
001^76L 
0015 77L 
001600L 
00160JL 
001602L 
001603L 
001604L 
001605L 
001606L 
001607L 
00.1 6 lOL 
00161 IL 
001612L 
001613L 
001614L 

001615L 
001616L 
00 1 6 1 7L 
00 1 620L 
00 I 62 1 L 
001622L 
001623L 
00I624L 
001625L 
001626L 
001627L 
001630L 



110 
00 
010 
00 
00 1 
00 1 
00 1 



000 
1 00.0 1 
0101 
10111 
QOOl 
0001 
01 11 
11001 1 10 
110101 00 
11010 111 

00 110001 
01 101 I 11 

01 0101 00 

00 no 1 1 1 

11001 1 10 
11010100 
11010 111 
001101 11 

no II 1 11 

00 110 1 11 

noon 10 

11010100 

noioi 11 

00 I 10001 
01101111 
01010100 

00 1101 n 

OJ 11 0001 
11010100 

110101 n 

00 110 1 11 

01 110001 
00 110 1 11 

00 n 1 11 

00 1 10001 
00 11 1 11 

n 1 1 1 n 



1100 110 
110 1 1100 
II 111011 
00000100 
1 IIOIOIO 
110010 11 

01000 1 n 
1 i 1 1 1 1 11 

100000 11 
000 1 000 1 

00 no no 

10 110010 
00001000 
00101001 

1 1 1 1 1 1 11 

I 1 1 1 1 00 
00010001 

0000 1 100 

01 I 11000 
01000 1 11 

11111111 

01110110 
00010001 

00 110 110 

1 1 11000 I 
00000000 
00101001 
1 I 110010 

onot 1 11 

00010001 

n 000000 

1 I 110001 
1 11 00000 
0000 1100 

no 1 11 00 

00000100 

nonoii 



DATAPOINT -CONFIUHNTIAL INhOHMATION - 5EH PAGE 1 

MICRO-PHOCESSOH EMULATION SUPPORT CODE - HJ5 - 
. HEGISTEH SAVE ANi) RESTORE 



79DEC12 16120 



* 

REGS« 

.18.00 ( 055) REGS 

• 

. 10.45 (111 055) REGL 



REGISTER SAVE 

(SP-7 I SP) <- XLHEDCBA; SP <- SP - 8 

REGISTER LOAD 

XLHEDCBA <- ( HL- 7 I HL) 



^BRA 
<DOPIP 




LDRP 
DOPI 
MWAIT 



STB 
DELAY 
STB 
MWAIT 



LDRP 
DOPI 

LDTR 
MWAIT 

LDPT 
to PR 

LDPP 
BRA 



REGL, He, IZ DO REGISTER LOAD NOT bAVE! 
MODrt,ND,-l-SWUSER,PSWI ALLOrt STACK ACCESS TO PROTECTED MEM. 

Tsr /r 



J^^' 



^9^ 



SP2MR ^^^m 

N00P,MEMPF1 



GET TOP ENTRY ON THE STACK 







L^^ 



J 



TEMPL,MDR,CC 

MDW,SB,8 

N00P,M£MPF1 



I MAR 
2 

SMR 
N00P,MEMPF1 



TEMPH , MDR 

MDrt,SB,0 

TEMPL 
»MEMPF1 

MAROL 
MAROH,TEMPH,IMA 

MODW,PSWI 
REGSVLP 



SAVE LSB OF POINTER 

UPDATE TOS (ASSUMING REGS WORKS) 



GET MSB OF TOS 



SAVE MSB OF POINTER 

UPDATE TOS (ASSUMING REGS WORKS) 

GET ORIGINAL (SAVED) LSB ^ 



LOAJJ^THEHifbffr'wT 
R — TtNlTcORRECT FOR 



UTI^L T( 



TH THE INITmL TOS 
THE FIRST DMAR 






RESTORE THE CORRECT MODE 
AND GO SAVE ALL THE REGS 



( 
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106b. 
1066. 
1067. 
1068. 
1069. 
1 70 . 

1071 . 

1 72 . 
1073. 



FH0C14G3/LIB 



10 74. 

10 75. 
10 76. 
10 77. 

1 78 . 



001631L 



001 
001 
001 
001 
001 
001 
001 
001 
001 
001 
001 
001 
001 
001 
>001 
>001 



63 IL 
632L 
633L 
634L 
635L 
636L 
637L 
640L 
64 IL 
642L 
643L 
644L 
645 L 
646L 
647L 
650L 



00 110001 
00 11 0001 
01010001 
00 1101 11 
00 1 1 1 1 1 
00 11 0001 
00 1 1 I 1 1 
00 1101 11 
11010100 

noioi 11 

001101 I 1 
11011000 
00 1 10001 
00 1101 11 
01011001 

1 1 00 n 1 1 



1 IIOOIOI 
11000 110 

0001 0000 
00000001 

010001 1 1 
00 1 1 1 I 
10001 1 II 
00001001 

0101 1 no 

00010001 
00001 101 
01 100010 
00110 110 
10001 1 11 

11111111 
1.1 II ] 1 11 



DATAPOINT CONFIDHNTIAL INFOHMATION - StH PAGH 1 

MICRO-PROCESSOR EMULATION. SUPPORT CODE - HJS - 
. REGISTER SAVE AND RESTORE 



/9DEC12 16*20 



+ 

REGL 

. 10.45 (111 055) REGL 



REGISTER LOAD 



6X/^ SY^f^^)^^^'^^ XLHEDCBA <- (HL-7 I HL) 



DLRX HL2MR 

MODLOP LDP I L I MP » 1/^8 

REGLLP STB SMR 

LDPP IMPO,MDR,DIMP 



MrtAIT ,MEMPF1 

STB OMAR 

BRA REGLLP, H§, I Z 

LDPP IMPO,MDR 

BRAX FETCHWtr 



IN IT HL TO MAR 

INIT COUNTER (FIRST IMPO TO A-REG!) 

GET DATA & COUNT DOWN (WILL \iE WASTED) 



LOOP FOR THE FULL COUNT 

-FINALLY GET THE REAL A-REG VALUE 

RESTORE CORRECT MOD£ (FOR SYSRET) 



t. 

I- V 



^Y(f^f 



u- ^ 



.fi^^.J 




(iA--- 



L^C. 



J,.e^^^^^ 



/ 



i 



UATAPOINT CONFIDENTIAL INFORMATION - SEE PAGE 1 
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108 1 . 
1082. 
1083. 
1084. 
1085. 
1086. 
1087. 
1088. 
1089. 
1090. 
1091 . 
1092. 
1093. 
1094. 
109t>. 
1096. 
1097. 

1098. 
1099. 
1100. 
1 101 . 
1 102. 



1103. 
1 104. 
1 104. 
1104. 
I 104. 
1 105. 
1106. 
1107. 
1108. 
1109. 



PriOC14G3/LIB 



MICrtO-PROCESSOP EMULATION SUPPORT CODE - HJS - 
SECTOR TABLE LOAD 



79DEC12 16:20 



1 1 



10. 
II . 
12. 
13. 
14. 



I 115. 
1 116. 
1 117. 
1 118. 



1 119. 

1120. 
1121 . 



001651L 



00I651L 
001652L 
001653L 
00 1 654L 
001655L 



00 II 0001 
01000101 
IIOOOOIO 
OlOlOlOt 
11 01 00 II 



00I656L 00 110001 
001657L 01010101 
00I660L 01 101 I II 



00 I 66 1 L 
001662L 
001663L 
00 1 664L 
001665L 
00 1 666L 



000101 II 
000101 I 1 
000101 11 
00010 1 11 
01010011 

not 1 1 11 



001667L 110 1111 
001670L 00 110001 
001671L 01010101 
0016/2L 1 10000 II 



001673L 
001674L 
U01675L 
0OI676L 
001677L 

001 700L 
.00 I 70 1 L 
00 I 702 L 
00I703L 
001704L 
001705L 
00r706L 
00I707L 



11011001 
I 1 0.1 1 1 1 

00 110001 
01010101 
01 II 00 10 

OIIOI I 11 
00 11 0001 

01 I 10010 
00 1 I I 1 I 
00 1 10001 
OllDl 1 11 
00 1 1 I I 
00 I 101 1 1 



1 1 I 1 1 00 
00000100 
00100100 
00100000 
01001000 

11010010 
00000 1 11 
1 1 110010 

10100010 
101 00010 
10100010 
10100010 
00001000 
01000100 

1 1 110010 
11010010 
0000 1 1 1 1 
100101 00 

00 1 1 1 I 1 1 

1 1 110001 

lion 1 II 

1 1 II 0000 

00 1 1 0001 

1 I 11000 t 
1 1010110 
00 11 0010 
11000000 

iiotoioi 

1 1 110010 
1 1100000 
10000101 



STL* 



( 



77 ) STL 



LOAD THE SECTOR TABLE 
5.40 + C * 2.50 (+0.55 IF C>8, OR 1.50 IF C=0 ) 

STL (0..C) <- (HL+C I HL); STL <15) <- SYS 



LOAD rtlTH OFFSET 

STL (R..R+C) <- (HL+C I HL) 

SrL(15) <- SYSROM 



(022 77) STLOA 
(111 77) STLOB 
(062 77) STLOC 
(113 077) STLOD 
(174 077) STLOE 
5.70 + C * 2.5 (+0.55 IF C>8 , OR 1.50 IF C=0) 

NOTE* DOES NOT CHANGE HL OR C-REGISTERS 

NOTE* IN STLO'C, LOW 4 BITS COUNTER & HIGH 4 BITS OFFSET! 



STLNRPT 



STLRPTD 



STLZRO 



TSTIP 

BRA 

TSTTT 

BRA 

DOR IP 



RPT 
SHIFT 
SHIFT 
SHI FT 
-SHIFT 
DOT I 
BRA 

LDRT 
TSTI P 

BRA 

BRA 

LDRT 

DOTIP 

DOTR 

LDRT 
.DOPRP 



LDRP 

DOP 
LDPT 



»SrtUSER,PS^I 

IVIOL$,FZ 
ND,SrtRPT,,,TW 
STLNRPT, TZ 



ONLY IF PR IV ED 



ASSUME WILL BE ZERO, NOT REPEATED 
WAS NOT REPEATED 



rEMP2,ND,07,URI+URC REPEATED. GET THE HL (MAR) BIAS AND 



4 

SL 

SL 

SL 

SL 

,OR,010 

STLRPTD 

TEMP2 
,017,URI+URC,TW 

FTCrilAB.TZ 

STLZRO, Te, I Z 
TEMP 1 
,ND,0360,IMPI 

, AC, TEMPI ,,C0 

TEMPI 
MAR0L,AC,TEMP2,UR 



TEMP2,URI+URH 

MAROH,IT 
URO+URH 



THE POINTER BIAS AND COUNT FOR THE 
THE POINTER BIAS AND COUNT FOR THE 
THE POINTER BIAS AND COUNT FOR THE 
THE POINTER BIAS AND COUNT FOR THE 
FINAL EIGHT STL LOADS 



REGULAR HL (MAR) NEEDS NO BIAS 
GET THE COUNT OF THE STEPS TO DO 

IF ZERO, WAS NOTHING TO DO. SO, THE END 

DO STANDARD STL 

SAVE AWAY 

IMP STL STARTS STL WITH OFFSET 

COMBINE GIVEN OFFSET WITH BIAS 

SAVE THE POINTER/ COUNTER AS GENERATED 
I+URL,CO BIAS-TABLE ADDRESS (IF NEEDED) 



SAVE AWAY URH SO CAN BE RESTORED 
IN CASE TABLE CROSSES PAGE BOUNDARY 



r 
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1122. 
1123. 
1124. 
1125. 
1126. 



1127. 
1128. 

1129. 



U30. 

1 131 . 

I 132. 
1133. 
1134. 



1135. 
1 136. 
1137. 
1 138. 
1139. 
1140. 
1141. 
1 142. 
1143. 
1144. 
1145. 

1146. 
1147. 

1 148. 

1149. 
1150. 
1151 . 

1152. 
1153. 

1154. 
1155. 
1156. 
1157. 
1158. 



PH0C14G3/LIB 



001710L OOMOl 11 010001 II 
0017 11L 01 1 10001 1 1 11 0001 



0017121 
00 1 / I 3L 
0017J4L 
001 71 5L 
00 1 7 I 6L 
001717L 
001 720 L 
00 1 72 1 L 
00I722L 
00 I 723L 
00 1 724L 
001725L 
001726L 
001 72 7L 
001730L 
00I731L 

00 1 732 L 

001 /33L 
00 I 734L 



00 1 735L 
00 1 736L 
001 737L 
00I740L 



001741L 
00 1 742L 



001 

001 

001 

001 

00,1 

>001 

001 

001 

>001 

>001 

>001 



743L 
744L 
745L 
746L 
747L 
/50L 
75 IL 
/52L 
75 3L 
754L 
755L 



00 
11 



11010 
11010 
001 10 I 11 
01010001 
OOMOl II 
00 110001 
01010101 
00 1 1 1 I 1 
00 110001 
00 1101 11 
00 I 1 000 1 
00 1101 II 
00 110 1 11 

00 110001 

01 I 10001 
01010010 
01101111 
01000101 
11010010 



01000101 
110100 11 
001 10001 
1 101 00 11 



101 
101 



0100 
0111 



01 110001 
00 1101 It 
01010001 
OOMOl 11 
00' M O' 111 
OIOMOOI 
01 M 0001 
01000101 
II 0000 M 
01011001 
1 1 00 I I 1 1 



00 110101 

000 1 1 110 
1 11 00000 
00000010 
00000100 
OOIlOllO 

1 II I I 101 
00000101 
1 1100101 
00001100 
1 1 1 11 00 
00000100 
01000 111 
10100101 

10 110001 
0000 1 1 11 

11 IIOOOI 
00000 1 1 1 
00 110101 



0000 1 1 II 
000 1 I 110 
00 110000 
00 110 110 



000 1 
000 1 



10 

00 



1 1100 10 
0000101 

I 1 1 0000 
1100000 

0000010 

1 II 1 1 1 

II 1 000 
00001 1 1 

1 1 1 1 1 1 
1 11 1 1 1 
] 1 1 1 1 1 



DATAPOINT CONFIDENTIAL INFORMATION - SEE PAGE 1 

MICHO-PROCESSOR EMULATION SUPPORT CODE - HJS - 
. SECTOR TABLE LOAD 



79DEC12 16*20 



STB 

STLAGN LDTR 

STLOOP MrtATT 

LDPT 
LDPI 

DO.PIP 

LDX 

LDPP 

STB 
LDX 

DORIR 



TSTIT 
BRA 



TSTIT 

BRA 

TSTPT 

BRA 



STLDONE MWAIT 

LDPR 

LDPI 

LDPT 
BPGX 
TSTIR 

BRA 
BRAX 



SMR 

TEMP 1 

, STLDONE 

MAR OH 
MODrt,SrtBASD 



GET NEXT (FIRST) TABLE ENTRY 

GET THE INITIAL VIRTUAL ADDRESS 

RESTORE REGS & SET VECTOR FIRST 

LOAD VIRTUAL ADDRESS FROM TEMP 
DISABLE BASING (AND 1 MS INTERRUPTS) 



STW,ND.0375,MDR SET PHYSICAL SECTOR # IN VIRTUAL LOCN. 



HL2MRH,IMAR 
MODrt,PSWI 



RESTORE MARH FROM H SAVE AREA 

RESTORE BASING (1 MS INT. 1 INST. DELAY 



SMR GET NEXT TABLE ENTRY 

MR2HLH SAVE MARH IN H 

TEMPI , AC, 017, TEMPI ,CC INC VIRTUAL SECTOR # & DECR COUNT 



,07 

STL OOP, FZ 



,017 

STLDONE, TZ 
FI ,SRVREQ 
STLAGN, TZ 



.$+1 



AT SPLIT POINT? 

NO, CONTINUE 

LOOPING JUMP IS DURING MEMORY READ 

THIS MAKES EXEC FASTER. 

REALLY FINISHED? 

YES, CLEANUP AND END 

NO, ANY SERVICE TO DOV 

NO, THEN DO SECOND HALF NOW 

REPEATED! WILL DO SERVICE BEFORE SECOND 

PART BUT DO CLEANUP FIRST 

RESTORE BEFORE MEMPF 

BUT NOTE* MAR MSB WILL BECOME INCORRECT 
RESTORE H-REG 



UR0*URH,TEMP2 

MAROH,SYSROM>8.AND.0360 !! FORCE LAST £NTRY TO 



STrt 

RIND 

,01 7, TEMPI 

RIND,TZ 
SRVRPT 



ACCESS PROTECT AND WRITE PROTECT 

REALLY FINISHED? 

YES, RESET REPEAT FLAG 

NO, DO IT AS REPEATED INST. 



(BOTH RIND & SRVRPT INDIRECT TO MEMPF) 
NOTE» THIS INSTRUCTION DOES AN EXTRA WASTED READ. BUT WHAT IF IT IS TO 
ACCESS PROTECTED MEMORY (ACROSS SECTOR BOUNDARY)? 
NO -PROBLEM, INSTRUCTION IS PRIV'D SO CAN'T GET THOSE VIOLATIONS 
BUT A REAL MEMPF OR STPE WILL CAUSE AN INTERRUPT. 



( 
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IId9. 
1160. 

I 161 . 
1 162. 
I 163. 

1 164. 

116b. 
I 166. 



PR0C14G3/LIB 



1167. 
1168. 
1169. 
1 1 70 . 



>0017t36L 
>00r757L 

00 1 760L 

001 760L 

001 761 L 

>001762L 

>001763L 

00 1 764L 
00 1 765L 
001766L 
00 1 767L 
001 770 L 
001 7/ IL 
00 1 772L 
001773L 
00 1 774L 
00 1 TibL 

00 1 776L 

001 777L 
002000 
000000 
000000 
000000 



0101 
110.0 



00 

1 1 



001 1000 
00 1 1000 







OJ 
00 

1 



00 

1 1 



1111 
nil 



0000 
0100 



11 

10 


1 
1 

1 
1 
1 



MICKO-PROCESSOH EMULATION SUPPORT CODE - HJS - 
. SECTOR TABLE LOAD 



79DECJ2 16»20 



* 

MEMPFl 



MIOEND 



BRAX 

DLDX 
BRAX 



MEMPF$ 

MR2HL 
FETCH 



TABPAGE PROCL 



FIT REMAINDER WHERE THERE IS ROOM 
RESTORE REG PAIR 



PROCLEN 


EQU 


$~PROCP 




USE 


PROCL 




SKIP 


PROCLEN 




END 


POR 
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PkOC14G3/LIB 



( 



DATAPOINT CONFIDENTIAL INFOHMATION - SEE PAGE 
MICRO-PROCESSOH EMULATION SUPPORT CODE - HJS - 



79DEC12 J6»20 



AC 



010015 


ACD 


001 Obi 


AURNON 


001417 


ALPHA 


00i!>43 


ALFHAL 


001413 


ALPHAS 




BO 




Bl 




^2 




B3 




B4 




B5 




B6 




B/ 




BASrt 


001400 


BETA 


001471 


BETAL 


00 J 432 


BETAS 


000 744 


BLKEND 


000 732 


BLKGO 


000 7b 1 


BLKIN 


000 71b 


BLKLOOP 


000675 


BLKOUT 


000742 


BLKRPT 


001312 


BP 


020006 


BR 




CO 




CI 


000000 


CAP 55 10 


000060 


CAPABILI 


000000 


CAPAPE 


000000 


CAP3LUE 


000000 


CAPCOM 


000020 


CAPDMPIO 


000000 


CAPIMA 


000000 


CAPMICR 


000040 


CAPRIM 




CC 


007000 


CDOR 


006000 


CDOX 




CF 



001067 



CMPF 

C0M4X 

DE2MRH 

Dt.2mL 

DIMP 



121 
1134 
.*35» I 
•598 
*903 
*1014 
•*893 
64»I 
651 1 
66* I 
67* I 
6811 
69^1 
70»I 
7 1 1 1 
107 
*8 /O 
, *956 
*927 
•527 
•52 1 
•530 
*511 
*495 
*d26 
. •780 

• 1 9i I 
218 
130 
*70tl 
•73 » I 
•6 It I 

• 66»I 

• 7 1 * I 
•68* I 
•65 1 1 
•64 1 1 
•69-x I 

112 
1104 

•8J»I 

•80 « I 

108 

260 

544 

936 
1134 

103 
•618 

515 

515 

356 



155 

108 
594 

921 

900 



887 
901 
D19 
518 

D46 

524 

449 

312 

166 
73* I 

385 
73x1 
73*1 
/3 » I 
73* I 
73 i I 
73* I 
73 » I 

164 
1134 



109 

271 

672 

-1004 

1147 

644 



163 
164 

922 



218 
166 

953 



219 



, 312 



436 



517 



672 



033 



1115 



1 118 



888 
522 



10 



461 
517 
294 



473 

750 



4/6 
751 



487 
I 115 



491 
1118 



506 



539 



542 



215 



.127 

2 77 

688 

1008 

1151 



4>02 



\3Q 

285 

74.9 

1057 



43 7 



150 
29.1 
776 

1059 



520 



156 

294 

79.9 

1062 



670 



176 

296 

800 

1102 



715 



1 79 

300 

805 

IJ08 



726 



181 

31 1 

80/ 

1 113 



759 



184 

3.13 

835 

I 117 



1030 



219 

324 

836 

1 119 



050 



257 

5J0 

933 

1124 



3-74 



380 



420 



94 J 



1073 
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PK0C14G3/LIB 




MICRO-f 


>ROCESSOR 


EMULAI 


'ION. SUPPO 


RT COD 


000051 


DL^OO 


• 148 














000102 


DLACNINC 


• 167 


165 












000 113 


ULINEOK 


• 176 


174 












000061 


DLNL 


• 155 


150 












000322 


ULNLH 


• 331 


181 












000103 


DLNXT 


• 170 


15/ 














OMAR 


269 


288 


299 


840 


851 


941 


996 




DMPADH 


446 


459 


4/0 


485 


502 


536 






UMPAOL 


450 


463 


474 


489 


507 


540 






DM PUT I 


4 77 


492 


543 












DMPDTO 


451 


464 


509 










000635 


DMPIN 


•467 














000602 


DMPOUT 
DMPRDS 


• 443 
474 


489 


540 










000654 


DMPSIN 


•480 














000616 


DMPSOUT 


•454 














001032 


EX ADR 


•583 














00 1122 


EXCOMl 
EX COM 1 1 
EXCOMl 2 
EXCOMl 4 
EXCOMl 5 
EXCOMl / 


• 660 
683 
681 
694 
697 
675 














00 1.105 


EXC0M4 


•634 














001153 


EXCOMJ 


•686 


668 


6/2 


680 


682 






001064 


EXDATA 


•612 














001053 


EXSTAT 


•60 1 














001074 


EX WRITE 
FETCH 


•622 
429 


528 


1164 












FETCHN 


388 
695 


452 

698 


465 


, 47B 


493 


575 


. 578 




FETCHRrt 


,1078 
















FETCHW 


610 


620 


752 


754 


970 






000044 


FETPC 


• 136 


864 












004000 


FLEX 


• 7911 














001505 


FTCHABrt 


•970 


946 












00 1153 


FTCHIAB 


•685 


, 891 


925 


1 110 










HL2MHH 


417 


.501 


541 


705 


739 


1070 


1130 




HL2MRL 


419 


501 


541 


705 


739 


1070 






IDCODH 


525 
















IDCODL 


525 
















IM2MRL 


690 
















IMAR 


133 
. i 062 


178 
1130 


282 


422 


464 


513 


5J5 




IMP8 


938 


1071 














IMP I 


45 J 


4.64 


592 


631 


643 


669 


942 




IMPO 


4 77 


492 


5/4 


577 


580 


1 073 


10 77 


000426 


INF END 


•387 


379 


384 










000417 


INFEXT 


•380 


376 












00042 7 


INFNO 


•388 


373 












000410 


INFO 


•363 














001014 


INPRIM 


•5.72 


559 













79DEC12 16«20 



lOOi 



1 032 



1075 



58 



632 



658 



6 77 



686 



718 



729 



762 



808 



0d3 



( 
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P 


001007 


INPUT 


001026 


INPZHO 


001022 


IN STAT 


020005 


10 


001120 


IHIMF 




IT 




ITW 


001333 


IVI0L$ 


000324 


IVIOLO 


02 0004 


IZ 


00025.1 


KBCLS 


000 1 ^Z 


KBD$DO 




KBDD 


000256 


KBDON 


000137 


KBDWAIT 


000236 


KBGET 


000207 


KBKEV 


000222 


KBKSl 


000221 


KBKS2 


00022 7 


KBOPN 


000210 


KB REG 


000264 


KBREINT 




KBSC 


010001 


KBSCNT 


000207 


KBTBL 


000555 


LDCfLD 


000442 


LDCFLP 


000576 


LOCFNL 


000440 


LDCFPT 




LDMAP 




LDRIMBP 




LIMP 


030000 


LINK 


000431 


LODCF 


000100 


LODSTEP 




LUF 




MAROH 




MAROL 




MDR 




Ml)W 




MEMPFS 


000332 


MEMPFO 


001756 


MEMPFl 


000 33 J 


MEMPFCF 


000330 


MEMPFDL 


001171 


MIN 


001202 


MI NOT 



PR0C14G3/LIB 



DATAPOINT CONFIDENTIAL INFORMATION - SEE PAGE 1 
MICRO-PROCESSOR EMULATION. SUPPORT CODE - HJS - 



79DECJ2 J 61 20 



*563 
•580 
•577 

• 18^1 
•658 

130 

260 

•820 

741 

• 1 7«I 
J 076 
•291 

• 187 

284 
•294 
•212 
•282 
•254 
•271 
•269 
•2 77 
•257 
•299 
110 

^Zt% I 
•253 
•4 1 8 
•407 
•431 
•404 

184 

690 

414 

•41 1 1 

•403 
1 034 

120 

J 26 

163 

161 

129 

942 

337 
•337 
• 1 1 60 
1074 
i'336 
•335 
•700 
•7 1 2 



571 
573 
888 
630 
166 
517 
332 
885 
399 
355 
1 112 
275 
153 

261 
213 
259 
216 
224 
228 
310 
238 
232 
295 
J09 
219 
425 
436 
405 
410 
335 

8 55 
150 

404 

125 

160 

179 

100/ 

163 

1051 

1160 

462 

717 

421 
151 

720 



922 
642 
294 

55/ 
919 
448 
359 

304 



280 



226 
230 

240 
246 
312 
215 



938 
181 

40 7 

183 
171 
183 

10 33 
279 

1058 

488 
728 



59 



1120 

569 

1098 

460 

373 



d89 

472 
376 



606 

486 

384 



617 

505 
425 



628 

538 
838 



640 



890 



657 



923 



666 



943 



707 



046 



263 
234 

248 



218 



236 
250 

260 



242 
252 

285 



244 



294 



296 



312 



313 



991 
297 



211 
184 
2 79 
1050 
284 



508 
761 



62 



071 
437 



591 
211 
293 
1057 
293 



545 
940 



170 



439 



847 
424 
308 
0.73 
311 



952 



77 



672 



J 062 
591 
311 

10 77 
543 



1006 



82 



673 



1 I 20 
936 
424 

1129 
592 



1031 



278 



688 



1127 
962 
463 

713 



049 



286 



692 



1143 

1020 

489 

724 



1052 



292 



1061 
509 

853 



-J 056 



307 



I 118 
758 

937 



060 



325 
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DATAPOINT CONFIDENTIAL INFORMATION - SEE PAGE 
MICRO- PROCESS OR EMULATION SUPPORT CODE - HJS - 



r 



79DEC12 16»20 





. 00 1 2 17 


MINST 


•723 


7 1 1 


731 






















001760 


MIOEND 


• 1 162 


721 


732 


768 


















/ 


02 0002 


MO 


*15il 


102 


132 


151 


159 


162 


170 


177 


182 


. 278 


286 


292 








307 


325 


421 


462 


488 


508 


545 


717 


728 


761 


834 


856 








940 


952 


1006 


1031 


1049 


1052 


1056 


1060 


1074 


1126 


1145 






00 1 553 


MODLOD 


• 1025 


966 






















( 


001633 
001433 
001503 


MODLOP 
MODSAV 
MODSRV 


• 1071 
•930 
•968 


1035 
894 
950 






















( 


00 I 446 


MODSVLP 


•940 


943 


























MOD^ 


106 


152 


609 


852 


94.7 


.1002 


1047 


1063 


1128 


1131 








001234 


MOUT 


*734 
























( 


001265 


MOUTLP 


,*756 


764 
























001250 


M0UTN16 


•749 


747 
























00127 


MOUTOUT 


•759 


744 
























02 0003 


MP 


* 1 6* I 


151 


159 


162 


170 


1 7.7 


182 


278 


286 


292 


307 


325 








421 


4.62 


488 


508 


545 


717 


728 


761 


834 


857 


940 


952 








.1006 


1031 


1049 


1052 


1056 


1060 


J 074 


1126 


1145 












MR2DEH 


516 




























MR2DFf 


516 




























MR2HLH 


514 


1133 


1163 
























MR2H11 


514 


1163 


























MR2PCH 


841 


997 


























MR2PCL 


689 


841 


99 7 
























MR2XXH 


426 




























MR2XXL 


423 
























{ 


00 1 115 


OUTPUT 

PC2MRH 

PC2MRL 

PCL 

PCMOD 

PCOH 

PCOL 


•646 
808 
691 
855 
857 
138 
113 


840 
808 
991 

136 


996 
840 


996 


















( 


010000 


PDLNP 


•25 II 


1.12 


156 


1.76 




















001005 


PFMIN 


•560 


/09 






















( 


001000 


PIN 
POPS TO 


• 55 J 
992 


























000000 


POk 


•96 


1 1 70 
























000022 


PORLST 


• 120 


122 






















( 


000045 


POROUT 


• 138 


115 
























000035 


PORZRO 


• 129 


134 
























000107 


PRE 


•3»I 


357 






















( 


000000 
000000 
002000 


PROC 

PROCL 

PROCLEN 


• 77 » I 
•90 
• 1 1 6.7 


88 

92 

1169 


338 


547 


1166 
















( 


000000 
002000 


PROCP 

PROD 

PSHSTO 


•92 

•78^1 

857 


1167 






















( 




PSWI 


152 


327 


358 


398 


447 


458 


471 


484 


504 


52 7 


537 


556 








568 


588 


605 


608 


616 


6J9 


627 


639 


656 


665 


706 


740 








817 


832 


853 


884 


918 


945 


951 


964 . 


1002 


. 1022 


li)47 


1063 


( 






1097 


1131 
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DATAPOINT CONFIDENTIAL INFORMATION - SEE PAGE 1 
MICRO-PROCESSOH EMULATION. SUPPORT CODE - HJS - 



:79UEC12 16*20 



001057 

001070 
01 0002 

001631 
001635 
00 1 564 
00 1 444 

000014 



001314 
I 0002 
001315 
001351 
001341 
00 1 336 
001347 
001321 
001307 
001323 



PSWND 

PS WO 

PSWOH 

Q 

HDLM 

HEGL 

REGLLP 

REGS 

REGSVLP 

RETS 

REV 

RIMAOR 

RIMADRO 

RIMDATI 

RIMDATO 

RIMSTAI 

RIND 

RLDCH 

SB 

SC 

SCANS V 

SCBP 

SCDON 

SCLST 

SCLSTW 

SCPC 

SCRAMI 

SCROMLI 

SCROMX 

SDLM 

SEATTKY 

SEDLBOT 

SEDLNOl 

SEDSPKY 

SEFUNCl 

SEFUNC2 

SEFUNC3 

SEFUNC4 

SEFUNC5 

SEINTKY 

SEKBDKY 

SEKBDWN 

SEKBRDY 

SEKBSl 

SELFREQ 

SERSTKY 

SESAVAF 

SESAVBF 

SEXADR 

SKCH 

SL 



*608 

105 
*619 

*23»I 

336 

• 1066 

• 1 072 

• 1039 
•938 

143 
•kin 

593 

643 

574 

631 

577 
1150 

413 

172 
1058 
•788 

*27-»I 
•.796 
•844 
*836 
*Q29 
•841 
•803 
• 774 
•80 7 

400 

243 

112 

1 73 

225 

241 

227 

235 

229 

233 

231 

223 

262 

237 

211 

160 

245 

893 
927 

591 
408 
670 



599 
327 

596 

294 

428 

1 046 

10 76 

1064 

3/8 



713 
758 
724 

1152 
415 
173 



260 
786 
326 
329 
561 
801 



778 



168 



306 
239 



306 

1020 

962 



104 



590 
402 



608 
520 



619 
670 



854 
715 



8.92 
726 



926 
759 



008 1029 
030 1104 



767 



418 
215 



285 

328 

821 
809 



42.7 
404 



52 



716 



727 



.750 



751 



753 



760 



05 



838 



1 /5 



309 
247 
309 



249 



25.1 



254 
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MICRO-PROCESSOR EMULATION SUPPORT CODE - HJS - 



79DEC.12 16x20 



( 

( 



001651 
00171 1 
00 1 74 1 

00 1 667 
001712 
001673 
001700 



001507 
001514 
00 I 4 1 5 



SLDCH 
SMR 

SP2MRH 

SP2MRL 

SPIL 

SRRSTRT 

SRSYSMF 

SRTMOUT 

SRVDO 

SRVNXT 

SRVREQ 

SRVHPT 

STAE 

STATUS 

STBOTLN 

STEK 

STKBKC 

STKBNS 

STKBRDY 

STL 

STLAGN 

STLDONE 

STL I MO UT 

STLNRPT 

STL OOP 

STLRPTD 

STLZRO 

STW 

STWE 

SVBKPNT 

SVINP 

SVIVIOL 

SVSCAL 

SV.UAINS 

SrtALBT 

SrtBASD 

SrtlNTE 

SWIRIM 

SrtRPT 

SWSCF 

SrtSTDT 

SWU3ER 



SYSESR 

3YSIVR 

SYS RET 

SYSRETO 

SYS RET 1 

SYSROM 

SYSSAV 



411 


413 


415 


424 


















160 


171 


180 


273 


290 


302 


419 


457 


483 


503 


742 


757 


963 


1003 


1021 


J 048 


1055 


1072 


1122 


1132 










85.1 


934 


960 


998 


1018 


1048 














850 


1000 


1048 




















935 


961 


1019 




















324 
























863 
























113 
























968 
























331 
























523 


. ,714 


725 


949 


1141 
















526 


1153 






















119 
























155 


212 


258 


272 


301 
















155 
























114 
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